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** ABOUT MICRO-80 ** 
EDITOR: Ian Vagg 

ASSOCIATE EDITORS: 

SOFTWARE: Peter Hartley 

HARDWARE: Edwin Paay 

MICRO-80 is the only Australian monthly magazine devoted entirely to the Tandy 
TRS-80 microcomputer and the Dick Smith System 80. It is available by 
subscription, $2^.00 for 12 months or by mail order at $2.50 per copy. A 
cassette containing all the programs in each month's issue is available for an 
additional $3-50 or a combined annual subscription to both magazine and cassette 

is available for $60.00. Special bulk purchase rates are also available to 
computer shops etc. Please use the form in this issue to order your copy or 
subscription. 

The purpose of MICRO-80 is to publish software and other information to help 
you get the most from your TRS-80 or System 80 and their peripherals. MICRO-80 
is in no way connected with either the Tandy or Dick Smith organisations. 

** WE WILL PAY YOU TO PUBLISH YOUR PROGRAMS ** 

Most of the information we publish is provided by our readers , to whom we pay 
royalties. An application form containing full details of how you can use your 
TRS-80 or System 80 to earn some extra income is included in every issue. 

** CONTENT ** 

Each month we publish at least one applications program in Level I BASIC, one 
in Level' 2 BASIC and one in DISK BASIC (or disk compatible Level 2). We also 
publish Utility programs in Level 2 BASIC and Machine Language. At least every 
second issue has an article on hardware modifications or a constructional 
article for a useful peripheral. In addition, we run articles on programming 
techniques both in Assembly Language and BASIC and we print letters to the 
Editor and new product reviews . 

** COPYRIGHT ** 

All the material published in this magazine is under copyright. That means 
that you must not copy it, except for your own use. This applies to 
photocopying the magazine itself or making copies of programs on tape or disk. 

** LIABILITY ** 

The programs and other articles in MICRO-80 are published in good faith and we 
do our utmost to ensure that they function as described. However, no liability 
can be accepted for the failure of any program or other article to function 
satisfactorily or for any consequential damages arising from their use for any 
purpose whatsoever. 
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***** EDITORIAL ***** 

Many of our recent subscribers are owners of new System 80's. We welcome 
you to our circle and assure you that we will support the System 80 just as 
enthusiastically as we have supported the TRS-80 for the past seven months. 
Elsewhere in this issue, you will see evidence of our support - for example, 
Peter Hartley has written some programming guidelines for our readers and 
authors to help ensure that our published programs are fully compatible between 
the two machines . 

Some of our System 80. owners have complained that they cannot load the 
programs on side 1 of our Free Software tape. These programs are written 
for TRS-80 Level I machines which use a different BASIC interpreter and 
record programs at only half the rate of Level II machines (the System 80 
is a Level II machine). Therefore, you cannot load Level I tapes directly 
into Level II machines. 

If you wish to do so, there are three alternatives: 

obtain a copy of the Tandy Level I to Level II conversion tape (this, 
however, has some bugs in it and can entail a lot of program rewriting). 

buy one of the Level I in Level II programs available on the American 
market. These programs temporarily convert your machine to Level I. 
MICRO-80 Products has some on order, so they will shortly be available 
here, too. 

instal a Level I ROM in the Level II machine with a switch, as described 
in last month's issue. This alternative is really not available to 
System 80 owners as it would be a major job involving an additional 
specially designed, PC board. 

** PRESENTATION AND PUBLICATION DATES ** 

No doubt you will have observed the changed presentation of MICRO-80 which 
commenced in June . This was rather forced upon us when the editorial CPU 
ceased to function with disk drives as we were half way through preparing 
the June issue. We have fixed it up now but, in the meantime, decided to 
revert to an old-fashioned electric typewriter to produce the magazine. The 
text is certainly more readable, judging from the comments we have had from 
a number of readers, despite the lack of right justification. We have 
therefore decided to stick with this format for the foreseeable future, but 
look for a further improvement in a month or two when one of the hush-hush 
projects currently being worked on by MICRO-80 PRODUCTS, comes to fruition. 

The main casualty of the CPU failure was the June publication date which 
actually stepped back into July. This, the July issue is being mailed out 
in early August. We hope you will understand and we assure you that we are 
doing our best to recover the lost time . 
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** WIDER DISTRIBUTION OF MICRO-80 ** 

Those readers who prefer to buy single copies of MICRO-80 will find the July- 
issue in the following outlets: 

Melbourne : McGill's Newsagency 

187 Elizabeth St. 

Sydney: C.I.S.A. 

159 Kent St. 

Brisbane : Software-80 

Shop 11 - 198 Moggill Rd. Q 

Taringa. 1+068. 

All States: Dick Smith Stores. 

** ABOUT LETTERS TO THE EDITOR ** 

Two of the more important functions of MICRO-80 are to act as a forum for 
readers' ideas and to assist readers who have specific problems. These we do 
by publishing and answering letters to the Editor. Unfortunately, we are 
becoming snowed under with letters. Before we get to the stage of one of the 
American magazines which recently announced that it had a backlog of 7 months 
of readers' letters, we will try to improve the situation by taking the 
following steps. 

- we will maximise the use of the space available for publishing replies 
to letters by abbreviating the letter itself as much as possible. 

those letters which entail requests for articles or programs for future 
issues of MICRO-80 will not be published separately but the request will 
go straight into the Readers' request column (to be reintroduced next 
month ) . 

when we get a considerable number of letters about one subject we will 
prepare an article specifically on that subject and will not acknowledge 
the individual letters . 

However, all that still leaves us with a problem area. A proportion of 
letters are from readers with specific problems which require detailed answers. 
Usually, these problems are annoying to the individual and may be preventing 
him from doing something important, so their solution is required urgently. 
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The only way we can think of handling this situation is to farm the replies 
out to people we know who have the technical background and experience to 
solve such problems. But such people usually earn part or all of their 
living solving such problems so they need to be paid. If you have a problem, 
and are willing to pay for its solution, then tell us so when you write in 
and we will find the appropriate person to deal with it . Send a cheque for 
$U.OO with your letter for which you can expect to obtain a full half hour 
of attention to your specific request. If you require more assistance than 
that, such as the rewriting of significant parts of a program, then whoever 
it is that is dealing with your request will contact you directly to negotiate 
a reasonable price. To ease administration, you should make your initial 
cheque payable to MICRO-80 but we are simply acting as a clearing house in 
this matter. The whole amount will be passed on to the person selected to 
solve your problem. 

We hope these actions will result in a better and faster response to your 
letters . 

** LEVEL II + I MODIFICATION ** 

Last month, in our article describing how to instal a Level I ROM in a Level II 
machine, we did not make it clear that this modification only applied to CHJ's 
containing either A or D boards. To ascertain whether your CPU is one of 
these, look at Fig. 3 on Page 25 of the June issue. At the top-centre of 
the PC board, you will see printed "TRS-80" "1700069.D". The letter at the 
end of the number, in this case D, indicates which version PC board you have. 
Unless this is an A or a D, you should not carry out the conversion described. 
We have now successfully converted a "G" board and will describe the 
conversion for that, next month. 

If you have a "G" board and have tried to carry out the conversion, this is 
what you should do while you are waiting for next month's issue: 






leave the switch wiring in place - that is the same for the G board as 
for the A and D boards . 

- Repair the PC track you cut in accordance with step 5 on Page 28 of the 
June issue. 

- remove the Level I ROM from Z3^ socket and put it somewhere safe. 

Your machine will now be back to Level II only but you will have carried out 
80$ of the work required to convert to Level I & II. 

In the meantime, if any of our readers have carried out conversions on other 
than A, D or G boards, we would be interested in publishing the results of 
their work. 
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** THE EXATRON STRINGY FLOPPY (ESF) ** 

Many MICRO-80 readers have bought ESF's and, from all accounts, are very happy 
with them. MICRO-80 intend to support this peripheral and Charlie Bart let t 
has agreed to become the Editor of an ESF Forum, to be published in each 
issue of MICRO-80. Charlie will give hints and tips on getting the most from 
your ESF. Next month, for instance, he will explain how to increase the 
effective size of your memory by chaining BASIC programs. Charlie will be 
happy to publish letters, programs, hints, tips, etc. from ESF owners so, as 
you discover new ways to use this excellent product, write in to us and we will 
pass your letter on to Charlie. 

** PROGRAMS SUBMITTED FOR PUBLICATION ** (j 

As some readers who have submitted programs for publication will know, we 
have sometimes been a bit slow in contacting them concerning the fate of 
their programs. This has proven to be a difficult area administratively, and 
we are busy streamlining our procedures. With the number of programs being 
submitted it is still going to take us at least a month, perhaps longer, to 
really put a program through its paces , but what we will do within 10 days of 
receiving your program is to make a backup copy and return your original 
cassette or disk so you know that we have received your correspondence. 
Thereafter, we will consider it in detail just as quickly as we can. 

** THE TRS-80 AND TI's SPEAK & SPELL ** 

Several readers have contacted us regarding items they have seen in the 
American press announcing a board which interfaces the TRS-80 to a Texas 
Instruments Speak & Spell machine. These boards, called "You Speak to me, 
Too" are produced by Percom Data Corporation and we have ordered a small 
quantity for evaluation, assuming the editorial offspring allow me to use 
their Speak & Spell 00k for a review of this product in a month or two's 
time. 

We have also ordered some data separator boards the U.S. press has said are 
a must for any business application involving disk drives. Apparently, the 
manufacturers' specification for the FD 1771 Floppy Disk Controller chip used 
in the expansion interfacs recommends the use of a data separator but Tandy 
did not follow this recommendation - hence the relatively high incidence of 
data I/O errors . A data separator board which could sell in this country for 
around $39.00 is supposed to virtually eliminate such errors. Look for a 
review on this product too, in the near future. 
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** SCOOP - NEW PRODUCTS FROM TANDY ** 

We have it on good authority that, about October, Tandy will release two new 
products in Australia. The first is a hand- held, wallet-sized microcomputer 
with an alpha-numeric display, able to be programmed in BASIC!! It will have 
1.9K of user RAM and will sell for less than $250. There will be an optional 
cassette interface available for about $90 or a compatible cassette recorder 
for about $lU0. 

The other product is called "classroom controller" (shades of I98U?). It 
will enable a number of "slave" TRS-80's to be connected to one "master" 
TRS-80, controlled by the teacher. Software in the "master" unit will allow 
the teacher to select which of the "slave units he (she) wishes to communicate 
with at any time. Price $699- 



** MARKET PLACE ** 

Don't forget our Market Place announced in the June issue if you have any 
hardware items to dispose of. Simply send in an advertisement up to 50 words.. 
in length. On successful sale, you pay us a commission of $5 or 5% of the 
advertised price, whichever is the higher, up to a maximum of $30. 

** SYSTEM 80 DEVELOPMENTS ** 

Jamieson Rowe, Dick Smith's Technical Director, has prepared Technical 
Bulletin No. 12 which explains how System 80 owners may fit a "Forward Arrow" 
key to their machines and also how to fit a switch which will allow optional 
transfer of all cassette functions to an external recorder. This would 
enable machine language programs as well as BASIC programs to be loaded from 
an external recorder having an adjustable volume control. We understand that 
this technical bulletin is available for the asking from any Dick Smith store. 

- 00000 - 

** TANDY LEVEL II & SYSTEM 80 COMPATIBILITY ** 
** NOTICE to all prospective authors ** 

The policy of MICRO-80 is to support both the Tandy and the Dick Smith machines, 
There are areas where these two Level II systems are not compatible, and 
authors will have to observe certain rules if their software is to be 
considered for publication by MICRO-80. 

1. If the CHR$(23) function is used, the screen display must look correct in 
both TANDY LARGE (32 CHARACTER) MODE, and in- SYSTEM 80 NORMAL SIZE BUT 
DOUBLE SPACED MODE. 
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2. The right arrow key is not to be used. 

3- The CLEAR key is not to be used. 

It. In games, for left and right movement INPUTS, the "<" and ">" will be 
adopted for on-screen instructions, and the characters "," and "." will 
be used in-program. 

5. In games, for up and down movement INPUTS, the up arrow (CNTRL on the 
System 80) and the down arrow (ESCP) will be used in-program and, for 
on-screen instructions , these keys will need to be described in words , as 
the symbols for the up and down arrows are absent from the character set 
of the System 80. 

6. In more serious applications, the right TAB function is available on the 
System 80, by using the <SHIFT><CIITRL> and <I> keys simultaneously. Any 
on-screen instructions should clarify this if the function is required. 
It would be better to try to write around this. 

7. Programs using lower-case modified displays are unsuited to the System 80 , 
which uses a different, smaller character generator. 

8. Because of uncertainties regarding future proposed modifications to the 
System 80 (if any) we reserve the right to amend these requirements in the 
future . 

- 00000 - 

***** '80 USERS GROUPS ***** 
The following is a list of '80 Users groups. If you have a group that is not 
included here, please let us know about it so we can publish details. Owners 
of System 80's are welcome at all the groups. 
BRISBANE: 

This is a new group which is just getting started. Enquiries to: 
Mr. Lance Lawes , 21 Rodney St. Lindum, U178, Qld. 
Telephone;- home (07) 396 2998; bus. (07) 268 1191 Ext.15 



MELBOURNE EASTERN-SUBURBS : 

1st Wednesday Tandy Store, 96 Koornang Road, 

of the month Carnegie. 

3rd Wednesday Kingswood College 

of the month 355 Station St., Box Hill 

CONTACT:- John Fletcher, 89 0677 between 9 - ^. 



DARWIN : CONTACT : - 

CONTACT:- Tony Domigan, P.O. BOX 39086,. Winnellie, NT. 5789 



ADELAIDE : 

1st Thursday TANDY City Store, 

of the month 9 1 * Gawler Place, Adelaide 

CONTACT:- Rod Stevens, 5152U1 between 9 - h. 
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***** ASSEMBLY LANGUAGE PROGRAMMING - PART 5 ***** 
by EDWIN R. PAAY 

This month we will deal with branching and subroutines. First we will discuss 

branching. 

* * * BRANCHING * * * 

There are two different ways that program execution can be made to branch to 
different locations. They are the jump (JP) instruction and the relative jump 
(JR) instruction. The jump instruction is equivalent to a GOTO statement in 
BASIC. It transfers program flow to whatever address is specified after the jump 
command, the instruction 100 JP 7000H for instance will simply transfer control 
to the code at 7000 hex. This is the only type of jump available on some 
microprocessors, notably the 8080. The Z80 however can also perform relative 
jumps. The relative jump instruction is followed by a two's complement 
displacement value which is one byte long. This means that the range of a 
relative jump is from -126 to +129. The benefits of relative jumps are: 

(1) A relative jump is only two bytes long as opposed to three bytes for 
a normal jump. 

(2) A program containing relative jumps is relocatable. This means that 
the program can run in any memory area because the relative jump 
doesn't point to a memory location directly, but indirectly, through 
its displacement byte. 

The actual format of the displacement byte needs some more discussion. The value 
of the displacement is actually not the displacement counting from the location 
of the address containing the relative jump instruction but is referenced to the 
address of the next instruction in memory following the relative jump. The 
relative jump is two bytes long, therefore , the displacement value is the 
displacement from the address of the relative jump minus two. This is because 
when an instruction is fetched from memory by the CPU the program counter (PC) 
is incremented to point to the next instruction before execution takes place , 
therefore, since the displacement is added to the current program counter value 
to compute the jump address, the displacement must be altered to allow for this. 
All that sounds very tedious doesn't it? Well, here is some good news. The 
assembler does all this for us and the actual displacement will never have to be 
calculated by the programmer. A relative jump might be used like this : 

1000 LOOP ADD A,C 
1100 LD B,A 
1200 JR LOOP 

All that is required is to specify a label or an address and the assembler will 
calculate the correct displacement and insert it in the right place without us 



1000 


CALL 


INPUT 


1010 


CP 


3 


1020 


JR 


Z, EQUAL 


1030 


JR 


C,LESS 


101*0 


JR 


NC,GREATR 
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having to worry about it. 

This brings us to conditional branching. In some instances we will want to make 
a jump only if certain conditions are met. In BASIC, for instance, we have the 
IF THEN statement and in FORTRAN we have an IF statement to do this. With 
machine language we use the flags to achieve exactly the same result, (if 
necessary review the discussion on flags in last month's issue to refresh your 
memory ) . Let me give an example . 

;INPUT A BYTE INTO THE "A" REG. 

^COMPARE WITH 3. 

;JUMP IF A = 3. 

;JUMP IF A < 3. 

;JUMP IF EQUAL OR GREATER THAN. 

The program above CALLs a routine labelled INPUT which inputs a byte into the 
A register. Line 1010 will then compare the value with the number 3. If the A 
register contains 3 then line 1020 will transfer control to a fictitious 
location labelled EQUAL, if the A register contains a number less than 3 then 
the carry flag will have been set (the carry flag is set if a borrow is 
generated) and therefore line 1030 would force a jump to location "LESS" if 
that was the case. Line 10U0 is not really needed but it demonstrates what a 
line causing a jump on an equal or greater than basis looks like. Note that 
relative jumps were used in the example above. If normal jumps had been used 
the only difference in the soxxrce code would be to replace the JR's with JP's. 

Register indirect addressing can be used for jumps too. For instance 
: 2300 JP (HL) will cause a jump to the location pointed to by the 
HL register pair. This can be put to good use in a program which inputs an 
address from the keyboard and converts it to Hex, then places it in the HL 
register pair and executes a JP (HL) , this would allow the user to jump to 
any location in memory. 

***** SUBROUTINES ***** 

Subroutines are possible through the CALL instruction. A CALL is equivalent to 
a GOSUB statement in BASIC, the RET is the same as the RETURN statement in BASIC. 



100 


CALL 


SUB 


110 


JP 


DONE 


120 SUB 


LD 


HL, 3E3H 


130 


XOR 


A 


lk0 


LD 


(HL),A 


150 


RET 





The program above shows how a subroutine might be used. Apart from the 
unconditional CALLs there are also conditional CALLs and RETurns. 
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1100 


• 


CALL 


C, INPUT 


123^ 




RET 


Z 


0035 


. 


CALL 


NZ,OUT 


0010 




RET 


NC 



All the lines above are valid, line 1100 will CALL a subroutine if the carry flag 
is set, line 123^ will RETurn from a subroutine if the Z flag is set etc. 

This brings us to the stack. When a CALL is executed the return address will be 
pushed on the stack. The situation is reversed with a RETurn instruction, a 
value is POPped from the stack and placed in the Program Counter. It is 
important therefore to make sure that the stack is at the same level when a RET 
is executed, as it was when the CALL was executed. 

Then there is the restart (RST) instruction, this is in effect a CALL, and a 
RETurn instruction can be used to return from it. The only difference is that 
a RST is only one byte long as compared to three for a normal CALL. The RST 
is only capable of going to eight different locations in low memory : 






100 


RST 


0H 


200 


RST 


8h 


300 


RST 


10H 


U00 


RST 


18H 


500 


RST 


20H 


600 


RST 


28H 


700 


RST 


30H 


800 


RST 


38H 



The restart in line 100 calls address 0000H, line 500 calls 0020H etc. The 
locations are in ROM of course and the TRS-80 makes good use of them. The 
ROM REFERENCE MANUAL gives a complete explanation of these and many other ROM 
routines. 

***** ROTATE AND SHIFT GROUP ***** 

These instructions are used for some arithmetic functions and for bit testing. 
In the case of microprocessors with a limited instruction set, the rotate 
instruction can be used to test if a certain bit is set or reset, by rotating 
the required number of bits around and testing the appropriate flag to see if 
the bit was or 1. The Z80 however, has complete bit test facilities and we 
do not have to resort to such tactics. As far as the shift function is 
concerned, each time a right shift takes place the number operated on is 
effectively divided by two while a left shift will multiply by two. This 
feature is used to avoid having to do many repeated additions when multiplying. 
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This is all I want to say about these functions at this point in time, my aim 
is to. get you programming in assembly language and memorizing all the rotate 
and shift functions is futile. All that is required is to know that these 
functions exist then when the need arises simply look them up in your ZILOG 
assembly language manual. 

***** BIT SET, RESET AND TEST GROUP ***** 

As I mentioned above, the Z80 has bit manipulation logic built in. This is one 
of the functions that sets the Z80 aside from other, less powerful microprocessors 
(like the 6502 used by the Pet and the Apple micro computers). 

The instructions in this group set, reset, or test one of the eight bits in A, B, 
C, D, E, H OR L registers in the CPU or in memory. 

1000 BIT 3, A ;TEST BIT 3 IN REG. "A" 

1010 SET 5,(HL) ;SET BIT 5 IN MEM. POINTED TO BY HL 

1020 RES 0,H ;RESET BIT IN REG. "H" 

Line 1000 tests the fourth bit (bit number 3) for zero or one. If bit 3 is zero 

the Z flag will be set and if one the Z flag will be reset. Line 1010 simply sets 

bit '5 in the memory location pointed to by the HL register pair to "1" and line 
1020 resets bit in the H register. 

***** INPUT /OUTPUT GROUP ***** 

Lastly, we have the I/O group. These instructions are used for I/O to the Z80 
ports. There is not much that I will say about these because they are exactly 
the same as the INP(X) and OUT X,Y statements in BASIC. 

3^00 OUT (0 FEH),A 
5600 IN A,(25H) 

These are two typical I/O instructions line 3400 outputs the contents of the A 
register to port FE Hexadecimal (25*0 whilst line 5600 inputs a byte from port 
25 hexadecimal (37) to register A. 

This brings us to the end of our discussion of the Z80 instruction set. The 
material presented so far in this series should allow anyone to write assembly 
language programs, simple ones at first and more complicated ones later, as all 
that is needed now is practice. In the next part of this series I will present 
small programs involving common problems arising with assembly language programs. 
To prepare for this you could try to write an assembly language program to input 
hexadecimal addresses from the keyboard, display them, find the content of the 
address specified and display it to the right of the address on the screen. For 
those of you who find that easy, try to write an assembly language program to 
accept hexadecimal numbers , convert them to decimal and print the result to the 
screen. 

As you will remember, last month I left you with a problem. The problem was to 
write an assembly language program which will allow us to store the image on 
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the screen and to restore it at will. 
explain each line. 

***** SAMPLE PROGRAM ***** 



I will list the program below and then 



0300 VIDEO 

0k00 START: 

01*50 

0500 

0600 

0700 



CONT: 
1100 
1200 
1300 

lU00 USR2 : 
1500 
1600 

1700 BUFR : 
1800 



ORG 

EQU 

CALL 

LD 

EXX 

CP 

JR 

LD 

LD 

LD 

LDIR 

EXX 

RET 

LD 

LD 

JR 

DEFS 

END 



7000H 
3C00H 
QA7FH 
A,L 

2 

Z.USR2 
HL, VIDEO 
DE,BUFR 
BC,U00H 



HL,BUFR 
DE, VIDEO 
CONT 
U00H 






GET FUNCTION CODE 

PUT IT IN "A" 
SAVE REGISTERS 

;IF USR(2) GOTO USR2 

; INITIALIZE REGISTERS 

STORE VIDEO IMAGE 
RESTORE REGISTERS 
BACK TO BASIC 



;RESTORE VIDEO IMAGE 
; STORE IMAGE HERE 



-# 






This program has been written for use by a USR call in BASIC. If the command 
USR(0) is executed, the image on the screen is stored in a buffer, else if the 
command USR(2) is executed then the image is restored to the screen from the 
buffer . 

LINE NUMBER EXPLANATION 

200 This tells the assembler that the object code is to be placed 
at 7000 hexadecimal onward. 

300 This sets label VIDEO to 3C00H. It is good practice in assembly- 
language to use labels whenever you can as it makes the program 
more readable and if it is necessary to change the value of a key 
address it is easier to change one EQU statement than it is to 
change many Hexadecimal values. 3C00H is the start of video memory. 

^00 A CALL 0A7FH will pass the value from the USR statement and place 
it in the HL register pair. This is explained in the level II 
manual . 

^50 This instruction loads the value passed from BASIC into the A 
register where it can be operated on. 

500 By using the alternate register set we effectively save the 
registers for BASIC. 

600 This line tests the value passed from BASIC to see if it is to 
store or recall the image. 
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700 If it is USR(2) then go and recall the previous image to the screen. 

800 Load the HL register pair with the start of video memory. 

9$$ Loa<a th e DE register pair with the BUFfeR address. 

1000 Load the BC register pair with the length of video memory. 

1100 Move a block of memory from HL into DE of length BC. 

1200 Restores the original registers. 

1300 Returns to BASIC. 

1^00 Entry for the recall image function. (USR(2)) 

1500 Same function as 800 and 900 above. 

1600 This jump simply makes use of some code that already exists earlier 

on in the program and avoids duplication of instructions already the: 

1700 This is DEFined to be Storage for the video image. 

1800 That * s all folks . 

If this is used as a subroutine in a game program then all that is required is tc 
execute a USR(0) after every move made and to provide the game with an extra 
command which would invoke a USR(2) to restore the picture to the screen. 

The -program below contains the machine language subroutine in DATA statements 
and shows how the subroutine is used. 

2" FOR X=20672 TO 28702: READY: POKEX,Y: NEXT 

4 DATA 205,127,10,125,217,254,2.40,13.33,0.50.17,30,112,1,0.4 

G DATA 237,176,217,201,33,30,112.17,0.60,24,241,0 

10 CLS 

15 FOR X=0 TO 127: SETCX.23): SETCX.0): SET(X,47>: NEXT 
20 FOR Y=0TO47: SET(64,Y): SETtB.Y): SETC127.Y): NEXT 
25 Y=0: FORX=0TO127: SET(X,Y): Y=Y+. 370073: NEXT 
30 Y=4r: F0RX=1T0127: SETCX.Y): Y-Y-. 370079: NEXT 
100 POKE16526,0: P0KE16527 , 112 
200 X=U5RC0) :' store display. 

300 CLS: FORX=0TO100: NEXT 

400 X=USR(.2): FORX=0TO100: NEXT : ' restore display and pause. 

500 GOT 0300 

600 END 



Lines 2 to 6 will put the machine language program in place. 

Lines 15 to 30 will draw a picture on the screen. 

Line 100 initializes the USR vector. 

Lines 300 to 500 will cause the picture to be flashed on and off at intervals 

determined by the FOR NEXT loops. This will demonstrate the speed of the program. 
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** BETTER BYTES ** a wander through the jungle of bytes, nybbles and bits, 

with Peter Hartley, 
(nybble = half a byte - No kidding!) 

Some of the tapes I've been sent recently have been most pleasing in their 
content. But too often their recording quality has been greatly lacking. 
So... HOW TO GET THE BEST FROM YOUR CASSETTE DECK. 

1. DO clean the deck at least once a week - ideally after every two hours 
of use. Computer usage is much more fussy than audio. 

2. DON'T use so-called cleaning tapes - they'll wear out the heads faster 
than they'll clean 'em. 

3. DO use cotton-buds for your cleaning. 

k. DON'T use metho - save it for a nightcap. DO use ISOPROPYL ALCOHOL. 

5. DO remember to clean the capstan and pinch roller. 

6. DO demagnetise the unit at least once a month - residual fields in the 
heads can wipe as much as 3 to 5 db off the top of a recording the very 
first time the tape is played! 

Now comes the really nasty business of HEAD ALIGNMENT. The head should be 
aligned in numerous planes, but the decks supplied with the '80 are oniy 
capable of alignment in one plane - the most critical. 

If you have really good hearing, you can align a head by ear, playing a known 
good tape - such as those supplied by MICRO-80 - and adjusting the head for 
the best treble response. However, it is far better to use a multimeter... 
Connect the multimeter across the loudspeaker terminals, set the volume to 
MINIMUM, load the good tape, press PLAY, sit the deck right way up and 
locate the tiny hole or rebate above the head that lines up with the little 
adjusting screw beside the head. 

Now go find a screwdriver that fits'. 

Turn the volume up just enough for some '80 type noises to issue forth, and 
select a meter scale that gives you a vaguely mid-scale reading. Now, gently 
rotate the adjusting screw back and forth until you locate the one position 
that gives the highest possible reading on the meter. 

*** WARNING *** NEVER PRESS THE PLAY OR STOP BUTTONS WHILE THE SCREWDRIVER 
IS INSERTED - I'll instal new heads for a fee! 

Now for some general advice on tape use. 

Even with a leader less tape, always leave a few inches at the start before the 
dump starts. It isn't possible to erase that first couple of inches without 
using a bulk eraser. 
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Don't use the tape that had last week's Big Band Concert on it without bulk 

erasing it first. 

Don't record on batteries. You were given a mains lead - so use it. There 

are some very nasty tapes around. Pay a few cents extra and get a good one. 

Don't use C90 or C120 tapes - they are too heavy for some decks, and are very 

prone to damage while running. 

For some strange reason, the first dump of the day always takes a long time 

to come out at the cassette end, so waste a dump, with no tape in the deck. 

(Press the little douvralackie at the back while you press PLAY and RECORD). 

In Level II, use the CLOAD? facility to check the dump, rather than making 

three or four, but always make two saves just in case. 

Level I is more reliable than Level II, so two dumps should be adequate if you 

follow all the above guidelines. 

Well, that's the sum of my contribution in this arena, but any tips from 
readers will be appreciated and passed on. 



WARP 8 YOUR DOS '. 

An unlikely title for this month's most cheery topic. It's an amazing 
thing, having been tied to a cassette system for so very long, that having 
now graduated to Disk, I still get frustrated with the delays of I/O. 

Herewith - a fix, which is proven on my own Dick Smith Drives, and which will 
probably work with all but the very oldest of worn drives, except that I'm 
advised that it only works with very new Shugarts, so please, no angry letters 
if it doesn't work on YOUR drive! 

Gloriously, itis a software fix, which can be organised by anyone with access 
to a copy of NEWDOS PLUS or a presumably pirated copy of SUPERZAP. 

The fix involves changing the values stuffed into the memory-mapped I/O 
location 37ECH. This location carries the delay values used by the Disc 
Controller to "slow down the system" while the drives move from one track to 
another . 

First make a back-up "System" disk. If you are unlucky enough to find that 
the fix doesn't work for you, the result will be garbage written all over the 
disk in the wrong places. Better to test it before your only good disk gets 
zapped . 

Wow load and run SUPERZAP. Where the change is to be made will depend on the 
DOS you are using, as will the values to be altered. 
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NEWDOS Track 0, sector 8, byte FE 
or sector 9, byte 0F 
You are looking for a k byte sequence IBF5. 
Change this to 1AF5 

2.1 TRSDOS Track 0, sector 7, byte 52 
Change 1BF5 to 1AF5 

2.2 TRSDOS Track 0, sector 7, byte 52 
Change the IF to IE **not a misprint ** 

2.3 TRSDOS same as for 2.2 

Not only does this fix actually work, but I have found it psychologically 
pleasing too! The read/write is noticeably reduced, as is the "suspense-time" 
at those moments when the read/write head goes careering back and forth like 
a lunatic sheepdog. In fact, I have experienced no losses of data since making 
these changes, and whenever a parity error has been detected by DOS I haven't 
even had time to get my podgy pinkies crossed before the sector was 
reprocessed and smooth operation resumed. 

One word of warning. After making these changes, run some SAVE and LOAD tests. 
There are two situations which will tell you that this modification isn't for 
YOUR drives. 

1. Faulty I/O operation. 

2. Metallic clanking noises from the drive. 

In these situations there isn't much that you can do except re-format the 
test disk and pretend that you never read this piece of MICRO-80. 

If you don't have a copy of NEWDOS PLUS, do yourself a favour and buy one 
for yourself. Absolutely BEWDY! If you don't know how to drive SUPERZAP, 
that now famous TRS-80 DOS & OTHER MYSTERIES will do you another favour. 






** INPUT#A$ ????????? 

Now, it doesn't need much of an expert to see that the title instruction 
wouldn't work. Only one problem - it does! In Level I, anyway. To save 
one entire screen of text, simply load MICRO-MUSIC, and type. Save to 
cassette as required. The pages of data can then be recovered from Level I 
BASIC with "I.#A$". Absolutely amazing. Even more puzzling, if you BREAK 
after the load is completed, try PRINTA$. You'll be greeted with the line 
number of THAT instruction. 
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***** INPUT/OUTPUT ***** 
From: Ron Kehn, 27 Guys Rd. , Korumburra, Vic. 3950. 

Will the lower case modification kit have any effect on storing programs on disk? 

I would like to connect my TRS-80 to an Apple 2 via an RS 232 interface. If 
anyone has attempted this or has any comments to make about the feasibility of 
exchanging programs between the two (given differences in graphics and prints, 
etc) I would really appreciate hearing from them. 

(No, Ron, the l>wer-case mod kit will not affect the storing of programs on disk 
in any way whatsoever. 

It should certainly be possible to transfer information between the two computers 
using RS 232 interfaces. Whether or not you could get useful programs to run on 
both, I cannot say. Perhaps some of our readers could help you, as you requested. 
Ed. ) 

From: George Glendinning, P.O. Box lOOU., Mackay, Qld. 1*7*10. 

I am an amateur radio operator (call sign VKUvcz). I would like to hear from any 
amateur who operates a computer net. I am usually on air on 3.620 MHz on Sundays 
at 9 p.m- 

(Hope someone out there shares similar interests, George - Ed.) 



From: Norm Partridge (by telephone) 






Lines l6U0 and I6U5 of the W0RDPR0C program in the December issue don't seem to 
make sense. Also, line 550 in the AMAZIN program in the February issue seems to 
be a bad list. 

(How right you are Norm, on both counts. We are amazed that no-one has queried 
us on the W0RDPR0C program before. The correct listings for these lines are 
shown below. 

16U0 IF LEN (AgS (N3) ) = THEN 1650 

I6U5 PRINT "LINE"; N3; "ALREADY OCCUPIED." = GOTO 200 

We have been queried on the AMAZIN program before but have answered the. queries 
to individuals rather than to readers in general. The last statement on line 550 
was cut off in its prime in some (all?) copies of the magazine. Instead of 
GOTO 5 it should have read GOTO 5 70 
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From: Frank Ellett , Palm Beach, Qld. 

I have a Level II 32K machine. The 16K version of FILES published in the 
February issue works well but the 32K version does not. The program returns 
a "CHECKSUM ERROR" and if I type "PRINT B" and enter that number, the computer 
freezes up. Also, why do you protect high memory when the program is at 
U2EF? 

(The 32K version of FILES was written for Disk BASIC users. Disk BASIC starts 
at 6A2kE and that is about where the machine language program expects to be. 
If you enter it into a Level II machine, it is at the wrong address and causes 
the program to crash. A number of other readers have had the same problem so 
we will publish a 32K and ^8K Level II version in a future issue. As far as 
protecting high memory is concerned, the first thing the machine language 
routine does is to move itself up to the top of memory, hence the need to 
protect it - Ed. ) 

From: E.B. Lindsay, 6 Hillcrest Avenue, Faulconbridge, N.S.W. 27?6. 

I have an IBM Model 72 input/output writer that has been converted to work 
with a Monroe 300 calculator. Does anyone have information on this 
conversion so that I can convert it to work with my System 80? 

(if any reader has such information, perhaps they would contact Mr. Lindsay 
directly - Ed. ) 

From : George Skarbeck , Glen Waverley , Vic . 

I have discovered a small bug in BMON's RENUMBER routine. If there is a 
line in the program, then the renumbering will not work properly. It 
inserts your first line number after every ELSE & THEN. I would like to see 
a program that will print the contents of the screen, just by pressing several 
keys, but does not need DOS. 

(thank you George, we have tried this out and you are correct about BMON's 
inability to renumber programs starting with a line 0. On occasion we have 
noticed that the BASIC interpreter itself has problems with line and 
usually avoid using it . We do not consider this bug is serious enough to 
warrant reworking BMON so advise all BMON users not to use line in their 
programs. We have put your suggestion into Readers' Requests - Ed.) 









ISSUE 8 (JULY 1980) MICRO-80 PAGE 19 



From: Mr. B. Bussenschutt, Highbury,' S.A. 

Mr. Bussenschutt made a number of constructive suggestions concerning layout 
and presentation of the magazine, most of which have now been implemented. 
He then asked "Re your 'On Board Cassette Monitor' in the May issue. The 
term, a "low value tantalum capaciter" is a bit vague. In your next issue, 
could you suggest a value?" 

(Any value from 0.1 micro F up would do - Ed. ) 

From: Chris Griffin, Doubleview, N.S.W. 

A feature exists on the Sorcerer whereby the entire contents of an array 

can be dumped to, or read in from, tape. Could you publish a machine language 

sub-routine to do this on the '80? 

(It's now in the Readers' Requests column, Chris - Ed.) 

From: Graham Malcolm, Thomastown, Vic. 

With reference to a conversation I had with you by phone about your Touchtype 
program. I tried your program from Cassette ff-2 and had complete success. 
Perhaps you could publish modifications for the System 80 on-board cassette 
to allow it to run tapes such as your Touchtype program. 

(Yes Graham, just as soon as we have a modification worked out, we will 
publish it - Ed. ) 

- 00000 - 

** RADIO SHACK CASINO GAMES PROGRAM PACKAGE ** a review by Uno Hoo. 

This three cassette package sells for $29-95 • If you're looking for fun, then 
it's O.K. If you're looking to test your latest "foolproof" system - then 
forget it! 

You get programs (no listings) for Craps, Keno, Slot Machine, Roulette, Wheel of 
Fortune, and Baccarat/Chemin-de-fer. As games they work well, and quite correctly 
to the rules and mechanics of the games. The graphics are first-rate, with a 
redraw routine in all the programs (the pretties are re-drawn each go, in case 
you've pressed break, clear, or hit the keyboard with a baseball bat), although 
some are a little slow, or odd, like the roulette wheel, which you might stare 
at for a few moments, until you realise that you're looking at the wheel from 
side-on! You'll also get a reasonable instruction book, with a cover that 
obviously came from their advertising agency! 



ISSUE 8 (JULY 1980) MICRO-80 PAGE 20 



I quote from the Introduction... 

"These programs are so accurate that you can even learn and devise betting 
systems for the real games in Reno..." 

Bulldust! There isn't a "system" in the world that doesn't depend to some 
extent on "being ahle to use a staking plan. The roulette game, for example, 
restricts each player to "betting one chip on each spin of the wheel. While you 
can "be several players at once, so to speak, you'll find that you soon run out 
of "seats". Remember that the longest recorded run of one colour at Monte 
was 28 consecutive spins! 

Keno only allows for one player, betting single chips. The Craps game suffers 
from similar problems. That's the gambler's point of view. 

From the fun aspect - well, my missus doesn't exactly love "the beast", but she 
spent five hours just playing with the slot machine , so this package clearly has 
some great saving graces. However, the package price is wickedly high. $29-95 
is a rip-off, when you consider the size of the market that TANDY dominates. 
It's a bit different for the small programmer who's trying to make a crust, but 
an organisation like TANDY/RADIO SHACK should be able to retail a package of 
this relatively mediocre calibre for about $12.50. 

***** XRX-III MODIFICATION - by Charlie Bartlett ***** 

We have all experienced the pure hell of trying to load our favourite program, 
(or a new one), from tape, only to have it not load at all or to find the 
memory full of nothing but garbage. So you sit there for six hours trying 
umpteen different volume settings and finally load the program, unfortunately 
by this time it's three o'clock in the morning and time to pack it in. At 
this point you have two choices , see your local doctor for some tranquilisers 
or instal this simple XRX-III Modification. I suggest the modification, it's 
cheaper ! ! ! 

Remove the top cover of the TRS-80. Place the pcb just below the " ? " key 
on the keyboard pcb, where it is held in place by the double-sided tape. 
BE SURE that its position will not interfere with the closing of the case. 

Using a sharp knife CAREFULLY cut the foil pattern between Z23, pin 9 and ih, 
pin 10 (see figure 3.) 

Connect the red wire to VD = +5 VDC (Z*+5, pin 10, figure 1 .) 

Connect the black wire to VS = GROUND (Zhk, pin 8, figure 1 '.) 

Connect the yellow wire to (Z*t3, pin 9, figure 1 . ) 

Connect the green wire to (zk, pin 10, f igure 1 .) 

Connect the blue wire to (Zbk, pin 12, figure 1..) 

Connect the violet wire to (Z2U, pin 9, figure l) 

Put the case back together, you've finished. 
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CUT THIS TftACE 



Hgure 1. TRS-80 Microcomputer PCB, Bottom Side (Partial View). 



- 



For those of you that are interested in the hairy theory, what this little 
piece of hardware does is to reset the R/S Latch, Z2fc, just as the OUTSIG* 
line would do, but BEFORE THE OUTSIG* line does. In this way we allow for a 
stretched CASSIN signal (due to poor cassette motor speed control and high- 
volume stretching) and that is about all there is to it, but it works. I 
can personally recommend that you make this modification, as before installing 
it in my machine I could not load the program that is helping to write this 
article, (ELECTRIC PENCIL) at all, after the modification it loaded first 
time, EVERY TIME. The XRX-III is available from Tandy for about $3.50 (they 
charge for installation), hence this article. (Last month we said that the 
XRX-III is supplied free by Tandy. That is only partially correct. If you 
upgrade to Level II now, you will get an XRX-III included in the price - if 
you already have a Level II machine you will have to pay at least $3.50 
(plus fitting if they do it for you). Leaving aside the principle of the 
thing , that ' s pretty good value:) • 
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***** SOFTWARE SECTION ***** 

In reading the listings in this section, it should be noted that the longer 
Level II programs have been processed to make them easier to read. Either 
a space has been inserted after each colon or multi-statement lines have 
been split at each colon and occupy several lines on the page. There is no 
need to include these additional spaces or line breaks when typing these 
programs into your own '80. 

The MICRO-80 printer shows either a "squiggle" or a square bracket instead 
of a line feed in the original listing- sadly it has no downward arrow symbol. 



** CRTCH ** Level 1 4K by Michael Svensdotter. 

The -first of two level one programs by Michael that ue are pub 1 ishing this 
month, and you can look -forward to seeing a lot more -from this Level 1 wizard. 
This game is a sort 'of reversed "pong", where you trap the moving ball using a 
qap in the court wal I . 

Simulation of the Level II 1NKEY function is undertaken by conventional means, 
and all the player has to do is to press the backspace key dt the right moment 
and the gap in the boundary will start moving. fifter every successful 
"trapping* the computer will change the speed and angle of the "bail". 

The publ ished 1 isting doesn* t have any on-screen instructions, but there is 
some memory left in 4K to add these if you wish. 

10 REM ** CftTCH ** COPYRIGHT (C) 1980 M. J. SUENSBOTTER 

12 REM 4 HORTOH HOENUE, SALISBURY NORTH, Sft 

15 REM L1/4K 

20 REM ** MICRO-80 ISSUE 8 JULY 1380 

68 ft( 1 )=0:fK2)=0 

70 F=RNB( 2) : 1FF = 1F=2: f)=860: B=l : G . 88 

80 F=l:ft=1023:B=126 

80 CLS:C=41:G=0:P.flTft, :R.(B,47) 

100 F.X=1T01ZB 

118 S.lX,B):S.tX,47") 

120 N.X:R.tl,0"):R. 1126,0") 

130 F.Y=1T046S.2 

140 S.(64,Y) 

150 N.Y 

160 F.H=1T041 

170 S.C1,H):S.(126,H) 

188 N.H 

180 IFG=1G=0:G.300 

250 E=RNBC )+l : B=RNBt )+RNBl )+RNB( )+l 

260 lFfi=860X=125--E=-E:D=-B:G.280 

270 X=2 

280 Y=RNB(46) 

300 IFP.tB,47)=0R.CB,47^:GOS.1100 

310 S.tX,Y>:IFP.l9,47)=0G.78 

320 X=X+B:Y=Y+E:IF(C<40^*(P.(B,46^=0^S.CB,46):S.tB,45) 

330 IFP.(B,47^=1F.Z=1TO20:N.2 

340 R.(X-D,Y-E):IFINT(X^=64X=X+1:Y=Y+E 

350 1FY<1Y=1:E=-E 
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** GREEN SCREEN SIMULATOR ** 
The Editorial monitor has been a target for 
derision from the assocate Editors for some 
time now. It is an early, 115V, American 
model. The display shivers and shakes and 
the controls have to he set critically to 
avoid annoying hum bars running up the screen. 
We had heard of Green Screen simulators 
before but memories of bits of coloured 
plastic stuck on black and white TV's in 
the old days to simulate colour sets 
(that shows our age!) had prevented us from 
taking the idea seriously. An enterprising 
young man from Melbourne, however, sent us 
a sample of a Green Screen Simulator which 
attaches to the front of the monitor cabinet 
via sticky pads. We fitted it to the Edit- 
orial monitor and, lo and behold, it is now 
the envy of the neighbourhood! This product 
really works, the green display is much 
more pleasing to the eye than the white, 
contrast is much better and even the shivers 
and shakes don't seem so noticeable but that 
is probably psychological. We are now con- 
verted to the virtue of this device and have 
no hesitation in offerring it to our cus- 
tomers. The GREEN SCREEN SIMULATOR is made 
from green perspex, cut and curved to fit 
your monitor. Please make sure to specify 
whether you have an old (squarish) or a new 
(rounded) style monitor when you send in your 
order. PRICE $19-95 incl. P&P . 

***** g KEY ***** 

Edwin paay has written a super new 
machine language utility to assist BASIC 
programmers. SKEY: 

* is compatible with BMON and other high 
memory utilities 

* stores BASIC expressions in the 
machine and allows you to recall them 
with a single shifted kejv entry 

Eg. you could designate (SHIFT) S 
to be STRING$( . There are 25 keys 
which store up to 15 characters each 
and one which stores 6k characters! 

* prints graphics symbols on the screen 
as you type in or list programs. 
This enables you to create moving 
graphics as easily as text 

PRICE $15.95 +50tf p&p 
Each cassette has TRS80,disk & Sys 80 versions 



***** MICRO-80 PRODUCTS ***** 
The advert, on the opposite page will appear) 
in the September editions of Electronics 
Australia and ETI. Since we have paid all 
that money for typesetting we thought. ni% 
would give you a sneak preview. Not all 
the products are in stock yet. Both the 
Micropolis disk drives and the MPI drives 
are due in about the end of August but 
we will take orders immediately on $30 
deposit. The MPI drive represents excellent 
value. Others in Australia are selling this 
same drive for over $1j00. It is the fast- 
est mini-floppy around, having a track to 
track access time of only 5ms.- that's at 
least 5 times faster than most other makes. 
It is also capable of running in double- 
density mode although we are not yet sure if 

it can be used that way on the TRS-80. 
************* 

***** neWDOS 80 ***** 
We have had some supply problems with this 
exciting new product. Latest word is that 
our shipment is held up pending the arrival 
of documentation and will be shipped by air 
on 5/8. We apologise to those customers 
who have already ordered NEWD0S 80 from us, 
when we advertised it in the June issue we 
genuinely believed that we would have it in 
stock before we received any orders. 
************* 

***** Tandy's TEA C Drives ***** 
We have been informed by a reader of MICRO-80 
that the TEA.C disk drives sold by TANDY are 
actually Uo track units but, since TANDY 
doesn't have a Uo track operating system, 
they are not telling anyone about it. If you 
have one of these drives why not buy a ko 
track NEWD0S+ operating system from us, if it 
doesn't work we will change it over to 35 
track for you and refund the d2ff£3"£BC&. 

NEWDOS is much better than TRSDOS anyway so 

either way, you gain. 

************* 

***** L0WER p RI cES FOR NEWDOS ***** 
You will note that the prices for NEWDOS 
systems are lower than in our catalogue. This 
has been made possible by bulk buying. Any- 
one who has paid the higher price can subtract 

the difference from his next order. 
************* 
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MICRO-80 PRODUCTS 
FOR TRS-80 AND SYSTEM '80 MICROCOMPUTERS 



77 TRACK 

DISK DRIVES 

DOUBLE YOUR CAPACITY 

DD-7S ... ... $775 

Micropenis Floppy Disk, 77 Track, 100% 
larger capacity than most mini-floppy drives, 
complete with cable, power supply, chassis, 
and includes N6WDOS '80. 

DD-7 ... ... $649 

Same as above but no cable or Newdos '80. 

DC4 ... ... $45 

4 drive connector cable. 







* * SPECIAL* * 

MPI DISK DRIVES 

ONLY $339!! 




40 track bare drive for TRS-80. Only 
requires readily available 5 volt 0.7 amp 
and 12 volt 1 amp power supply to be 
up and running. Can be mounted in simple 
cabinet or used bare. 



DISKETTES FOR TRS-80 


GREENC0RP 


$4.50 ea 


VERBATIM 77 TRACK 


. . $7.99 ea 


Minimum Order 


10 



EXATRON STRINGY 
FLOPPY 

$352.50 incl p&p 

15 times faster than cassette, infinitely more 
reliable. Completely under computer con- 
trol, the stringy floppy is easier to use than 
disks and is a very much cheaper alternative. 
Will save and load any L2/16K software. 
Special software also available. 

Wafers for Stringy Floppy 
$3.50 ea. Any Size 



MICRO-80 MAGAZINE 

ANNUAL SUBSCRIPTION ... $24.00 
Monthly Magazine dedicated to TRS-80 and 
System '80 users. Every issue contains at 
least 6 new programs, plus problem solving 
columns, hardware articles, readers' letters, 
hints, etc., etc. 

FREE SOFTWARE OFFER 

$40 WORTH OF SOFTWARE FOR TRS-80 
AND SYSTEM '80 WITH EVERY NEW 
SUBSCRIPTION TO MICRO-80! 

Every new subscriber will receive on cassette, 
ready to load, 3 x Level I and 3 x Level II 
programs (includes our fabulous household 
budget program), with a regular retail value 
of at least $40. 



16K MEMORY EXPANSION KIT 

ONLY $97 incl. p&p 

These are prime, branded, 200 ns (yes, 
200 ns!) chips. You will pay much more 
elsewhere for slow, 350 ns. chips. Ours are 
guaranteed for 12 months. A pair of DIP 
shunts is also required to upgrade the 
CPU memory — these cost an additional 
$4.00. All kits come complete with full, 
step-by-step instructions, no soldering is 
required. You don't have to be an electronic 
type to instal them. 



THE FABULOUS 

NEWDOS 80 

IN STOCK NOW! 

ND-80 ... ... $149 

The disk operating system that gives: 

• New basic commands that support 
variable record lengths up to 4095 
bytes long. 

• Mix or match disk drives — supports 
any number of tracks from 18 to 80. 
Use 35, 40 or 77 track 5" mini disk drives 
or 8" disk drives, or any combination. 

• A security boot-up for basic or machine 
code programs. User never sees "Dos- 
ready" or "Ready" and cannot "break" 
clear screen or issue any direct basic 
statement including "List" . . . 

. . . and much, much more 

ND-35+ ... ... $99 

Newdos+ for 35 track drives 

ND-40+ ... ... $110 

Newdos+ for 40 track drives 



BOOKS 

LEVEL II ROM REFERENCE MANUAL 
$24.95 plus $1 .20 p&p 

Produced in Australia by MICRO-80, this 
book is a must for the machine language 
programmer or for the BASIC programmer 
who wants to understand how the BASIC 
interpreter works. Over 70 pages packed 
full of useful information and sample 
programs. Applies to both TRS-80 and 
SYSTEM 80. 

TRS-80 DISK AND OTHER MYSTERIES 
$24.95 plus $1.20 p&p 

The hottest selling TRS-80 book in the 
USA. Disk file structures revealed, DOS's 
compared and explained, how to recover 
lost files, how to rebuild crashed directories 
— this is a MUST for the serious Disk user. 

INTRODUCTION TOT-BUG 
$12.50 plus $1.20 p&p 

Describes in detail how to use Tandy's 
T-bug. Each command explained and dis- 
cussed in detail with examples. A must 
for the T-Bug user. 



AUSTRALIAN SOFTWARE 

BM0N (L2/16K) $19.95 plus 50c p&p 
The ultimate program to assist BASIC pro- 
grammers. 

T0UCHTYPE (L2/4K) $19.95 plus 50c p&p 

22 lessons to teach you to type on your 
own keyboard and screen! 

RPN CALCULATOR (L2/16K & 32K) 
$14.95 plus 50c p&p 

Turns your computer into a $600 calculator. 
Ideal for Architects, Surveyors, Engineers, 
Teachers, Scientists, etc. 

U-BOAT (L2/16K) $7.50 plus 50c p&p 

You're the Commander, read all theguages, 
fire the torpedoes, crash dive, get the 
enemy before his depth charges get you!! 

MMM-1 GAMES PACK (L2/4K) 
$7.50 plus 50c p&p 

3 fast moving games - INDY 500, SUB- 
HUNT, KNIEVEL 

MMM-2 GAMES PACK (L2/4K) 
$7.50 plus 50c p&p 

3 more games with fast moving graphics — 
TANK, THIEF, SHOOTOUT 



PROGRAMS BY 

/HCRpSOfT 



BASIC COMPILER 



$210 



Converts Level II basic programs to machine 
code, automatically. A compiled program 
runs, on average, 3-10 times faster than the 
original basic program. 
(Requires 48K One Disk) 

DISK EDITOR ASSEMBLER 
Save $30 ONLY $109 

Supports macros, linking loader, editor, 
cross reference. 
(Requires 32K One Disk) 

ADVENTURE ON DISK ... $37.15 

This game fills an entire diskette. Endless 
variety and challenge as you seek to rise to 
the level of Grand Master (until you gain 
skill, there are whole areas of the cave that 
you cannot enter). 
(Requires 32K One Disk) 

EDITOR ASSEMBLER-PLUS ... $41.15 

A much improved editor assembler and 
debug/monitor for L2/16K machines. As- 
sembles directly into memory, supports 
macros and conditional assembly, includes 
new commands — substitute, move, copy 
and extend. 

LEVEL III BASIC $59.95 

Loads on top of Level II Basic and gives 
advanced graphics, automatic renumbering, 
single stroke instructions (shift-key entries), 
keyboard debounce. Suitable for L2/16K 
and up. (Not Disk Basic). 



SCOTCH BRAND 
PERSONAL COMPUTING CASSETTES 

C-10 pack of 10 . . . $26.00 incl. p&p 
C-30 pack of 10 . . . $28.00 incl. p&p 



To: MICRO-80 

P.O. Box 213, Goodwood, S.A. 5034 

Please rush me the items checked below: 
~\ 1 2 month subscription to 
MICRO-80 and my free 
software cassette $24.00 

_~] 1 2 month subscription to 

MICRO-80 and the cassette 

edition, plus my free 

software cassette $60.00 

□ The lastest issue of MICRO-80 $2.50 

PLUS THE ITEMS LISTED BELOW 



DESCRIPTION 


PRICE 






















TOTAL ENCLOSED 





Name ... 
Address . 



. Post Code 



No, 



welcome here 
Please debit my Bankcard $ 

Expiry date 

Signature , 
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360 1FY>46Y=46:E=-E 

370 1F(X>2)*(X<125)G.300 

380 G=0--IFX<2X=2 

390 IFX>125X=125 

400 1F(P.(X+1,Y) = 1)+(P.(X-1,Y:)=1)G=1:D=-D:S.<X,Y) 

420 IFG=1G.450 

430 !FF=lfK l)=Fl( 1)+1:G.450 

440 fi(2)=fl(2) + l 

450 P.fiT90,fil2);ftT88,FUl); 

460 F.N=1T05:S.(B,C+N):N.N:F.N=1T05:R.(B,41+N):N.N 

470 IFG=0F.Z=1TO1000:N.Z 

480 IFF=1F=2:R=960:B=1:G.500 

490 F=l:ft=1023:B=12B 

500 C=41:P.ftTft, :S.(B,47):G.190 

1100 IFOC1RET. 

1110 lFC=42R.(B,C+i:> 

1150 S.CB,C+5):R.IB,C) 

11B0 C=C-1 

1200 RET. 



** FUEL ECONOMY ** LI/4K 

Michael's second program this month is, like all his work that we've seei 
veru compact. What more can we sau. - except that it works and works well , a 
it' s useful . 



1 REM >< FUEL ECONOMY BY M J SUENSDOTTER 

2 REM >< 4 NORTON RUE. SALISBURY NTH. 2588756 

3 REM >< 10/5/79 

4 REM COPYRIGHT tC> 1979, 1980 

5 REM M1CRO-B0 ISSUE 8 - JULY 1980 
80 CLS 

100 P. "FUEL ECONOMY" 
110 P . " %XV.V.^%%5iV.5«i%% m : P . 

120 l.-HOW MANY LITRES BID YOU USE* ;L 

130 1.-WHP.T WftS THE FIRST ODOMETER RERBING";N 

140 I. "ENTER THE SECOND ODOMETER RERDING";0 

150 G=1NT(L/. 0454609 )/100:M=O-N:P=INU (M/G)*100')/180 

160 K=1NT i. M*160 . 9 )/ 108: J=1NT ( t L/K )* 10000 )/100 

170 P . RT128, "GfiLLONS* ;T . C 20-); "MILES" ;T . I 40); "M/G 

180 P.G;T.t20);M;T.(40V,P 

200 P. :P.:P. "LITRES" ;T. (20), "KILOMETERS" ;T.t 40 V,"L/100 KM 

210 P.L;T.(20);K;T.C40>;J 
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■ 

** INTEREST & LORN REPRYMENT CALCULATOR ** LI1/16K by Berme Simpson. 

MICRO - 80' s software editor is not a -financial genius (more of a financial 
disaster'} and he doesn't understand how Bernie's copyrighted f ormual ae work*. 
However, he is advised that (a) the formulae DO work, and lb} the program 
follows the formulae. He can te-l I you that the program logic is Al, therefore 
the program does what Bernie claims. Start typing! 

10 'COPYRIGHT CO 1979, 1980 

AUTHOR: BERNIE SIMSON 18 BULLER TCE, 
20 ' CHELTENHAM SR. PH 477528 

30 ' MICRO-80 ISSUE 8, JULY 1880 

50 ' PROGRAM TO CALCULATE LORN REPAYMENTS FOR ADJUSTABLE 
B0 ' RftTE LOANS, USING FORMULA: 

70 ' R=P*FlN*(F-l)/(FtN-l) FOR INTEREST CHARGED ON MAXIMUM 
75 ' MONTHLY BRLRNCE. 

80 ' R=P*Fl(N-i:)*(F-l)/(FtN-l) FOR INTEREST CHRRGEB ON 
82 ' MINIMUM MONTHLY BRLRNCE. 

85 ' WHERE R=REPRYMENT PER PERIOD, P=PRINCIPRL, 

87 ' F=INTEREST INCREASING FRCTOR PER PERIOD, 
89 ' (IE. F=RNNURL INT RATE/1200 + 1) 

30 ' N=NUMBER OF REPRYMENT PERIODS. 
92 ' 

94 ' *** THIS FORMULR IS COPYRIGHT OF B SIMSON. *** 

88 ' 

100 CLS:PRINT@19,"L0AN REPRYMENT CALCULATIONS" 
120 PRINT ©83, *=========================» 

140 PRINT :T=0:P1=0:P2=0: PI =0:N1=0:N2=0:NI=0:F=0:MS=* * : A*=* $$*.#**. **" 

160 INPUT -MRX OR MIN MTHLY BALANCE" ;M* 

180 IFM1D*(MS, 1,3)=*MAX*THENMM=1:GOTO220 

200 IFMID*(MS,1,3X>*MIN"THENPRINT,,*WHAT ??*:GOTO160 

210 MM=-1 

220 INPUT "STARTING PR1NC1PRL" ;P1 :IFPK=0THENPRINT, , "WHRT ??":GOTO220 

225 INPUT "ENDING PRINCIPAL* ;P2:IFP2<P1THENPRINT ,* CAN' T BE LESS THRN STRRTING PRI 
NC1PRL * : GOT0225 

230 INPUT "INCREMENT*; PI :IFPK0THENPRINT,* CAN'T BE NEGATIVE" :GOTO230 

240 INPUT "STRRTING TERM IN MTHS C 1-480 )* ;N1: IFNK 1ORN1>480ORN1OINT(N1 HHENPRINT 

, "WHRT THE ...??": GOTO240 

245 INPUT "ENDING TERM IN MTHS (ALLOW MAX 4 COLUMNS)" ;N2: IFN2<N1ORN2>480ORN2OINT 

(N2)THENPRINT, "INVALID ENDING TERM* : G0T0245 

250 INPUT "INCREMENT (IN MTHS )* ;NI: IFNK0ORNIOINTCNI JPRINT, "INVALID INCREMENT" :G 
0T0258 

255 IFN1+(NI*3KN2THENPRINT, -INCREMENT TOO SMRLL FOR 4 COLUMNS* : GOT 0250 

260 INPUT "INTEREST RATE C*i PER NTH)" ;F: IFF<=0ORF>10THENPRINT , "WHAT THE. ..-?•?•-. GO 
TO260 

262 CLS: PRINT "MONTHLY REPAYMENTS - *;F;**/. ON "; =IFMM=1THENPRINT "MAXIMUM ";: ELSE 
PRINT "MINIMUM"; 

263 PRINT" MONTHLY BRLRNCE* 

265 F=F/ 100+1 -.PRINT "PRINCIPAL"," TERM *:PRINT" (»>", 

268 PRINT" *;:F0RL=N1T0N2STEPNI:PRINTL;* * ; : NEXT: PRINT 

270 PRINT," *;:FORL=N1TON2STEPNI:Y=INT(L/12*10)/'10:PR1NT*(*;Y;*YRS)*:* *--NEXT 
•-PRINT 

275 F0RP=P1T0P2STEPPI 

277 PRINTP, 

280 FORN=NlTON2STEPNl 

300 IFMM=1THENGOSUB500ELSEIFMM=-1THENGOSUB600ELSEPRINT*MM TEST ERROR*: STOP 

310 PRINTUSINGA* ; R ; : NEXTN : PRINT : NEXTP 

399 END 

490 ' ** MRX METHOD ** 

500 T=F tN-.R=P*T*(F- 1 >•( T- 1 ) : RETURN 

590 ' ** MIN METHOD ** 

600 T=FtN:R=P*T*tF-l)/(F*(T-l)):RETURN 



I 
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***** EDITORS/ASSEMBLERS, MONITORS etc. ***** 
(a brief explanation) 
Last month we promised that we would give a brief, simple explanation of some of the 
programs which machine language programmers use to help speed up their work, such 
programs are called utilities. 
EDITOR /ASSEMBLER 

The most obvious way to write machine language programs is to arm yourself with a 
card containing the 150 odd Z80 instructions, a flow chart of the program you want 
to write and then list down each instruction, all the relevant addresses, registers 
etc.. This is called "hand assembling" a program and, if you are writing a program 
of more than about 500 bytes in length, would drive you mad! 

An alternative is to use an Editor /Assembler utility program. First, you load it 
into the computer then put it into EDIT mode, which allows you to enter text and 
edit it, rather like typing in a BASIC program. You use line numbers and, instead 
of BASIC statements, commands etc., you use mnemonics which are a convenient shorthand 
for the Z80 instructions (eg. LD=L0AD). When you have finished typing in the program 
you can use ASSEMBLY mode to assemble the program, which is the process whereby the 
mnemonics are converted to the actual machine code used by the Z80. You may write 
this out to a SYSTEM tape or, in some cases, put it directly into memory for execution' 
Using ah Edit or /Assembler makes machine language programming very much faster than 
doinng it by "hand". 

(continued on page 3k) 



*. r ,'MbOL/BHS »* 16K Dl SB BASIC HND LINE PRINTER bu Soencar &.?orq 6 . 

lh'o« o + you who ho, e subscribed to tlicro-80 iron, the ear | y do^s will r«eol| 
our stand on Educational Programs. This, then, is our first Educational 

Program, which we present with a great deal of pleasure. 

ThP psychological basis for the approaches adopted here are <*«""«<» *j 
Soencer-s article, elsewhere in this edition, and the listing is well endows 
with REMs, which include notes on altering the program for non-d,sk systems. 

T he program seeks to teach the student 14 chemical symbols, but can be easily 
a\ tered to cope with any educational area where there is a one to one 
corresoondence with two alphanumeric data sets. 

Use is made of a "cassette-full of praise", complementary screen ^isolays, 
etc., while the line-printer outputs a revision sheet for the student to take] 
away after the learning session. I 

It doesn't matter if you don't give a damn about chemical symb °^ J^ e ~ > 
this program still succeeds in teaching them to you, and, most i-P^tantl * »* 
doesn't leave you feeling like an idiot when you make a mistake. (It even 
demonstrates how'to take ca^e of possible varient spellings of the same 
data ) . 

Studu the REMs carefully, because they clearly explain what each routine J 
doing, and what changes may be needed for your system. Just the noddy 
routine makes this program worthwhile'. 
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14 ' SYMBOL/BAS 16k DISK BASIC, LINE PRINTER AND CRSSETTE~ 

MODIFICATIONS FOR LESSER SYSTEMS INCLUDED IN LISTING" 
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M1CRO-80 ISSUE 7, JUNE 1980 
20 ' COPYRIGHT C SPENCER GEORGE 1980 

100 ' SYMBOLS/BRS 
120 ' S C G 13/3/80 

150 ' THIS PROGRRM IS WRITTEN IN DISK BfiSIC, BUT MAY BE CHANGED TO 
LEUEL 11 BY RLTERING LINES 970. 1000. 1030 TO INPUT 
1NSTERD OF LINE1NPUT.~ 

TH1S CHRNGE MERNS THRT R COMMA MRY NOT BE USED IN R DATE, 
160 ' SO 3 MRRCH OR 3/3/80 WILL BE RCCEPTED" 

BUT NOT 3 MRRCH, 1980 
180 ' IF R PRINTER IS NOT RTTRCHED THEN LINES 300 . 480 , 2490 



RND 
240 CLERR 2000 
250 DIM QNS( 14) 
260 RRNDOM 
270 GOSUB 630 
280 GOSUB 820 

MEMORY 
Z90 H = 1 
300 GOSUB 950 
310 GOSUB 1130 
320 GOSUB 1380 
330 C = 
340 GOSUB 1460 



2580 SHOULD BE DELETED 



DISPLRYS THE HERDING 
PLRCES CHEMICRLS RND SYMBOLS IN NRMED 



COLLECTS NRME, DRTE, TIME 

PLRCES NODDY PICTURE IN NRMED MEMORY 
DISPLRYS SYMBOLS 

DISPLRYS 



■ TODRY WE WILL USE THIS INFORMRTION - 
350 GOSUB 1230 : * PLRCES R LRRGE C 

IN NRMED MEMORY 
360 C= 
370 K = 1 
380 GOSUB 1580 : ' 



O 



R 



R 



DISPLRYED) 
390 CLS 
400 K = 2 
410 GOSUB 1580 



420 GOSUB 1760 

430 K = 3 

440 GOSUB 1580 



DISPLRY) 
450 CLS 
460 K = 4 
470 GOSUB 1580 



PRODUCES FIRST SET OF 10 QUESTIONS ~ 

(WHRT IS SYMBOL FOR ? TRBLE 



: * PRODUCES SECOND SET OF 10 QUESTIONS 

(.WHAT IS THE SYMBOL FOR ? TRBLE NOT DISPLRYED) 

: ' PRODUCES THIRD SET OF 10 QUESTIONS 

(WHRT IS NAME FOR ? TRBLE OF SYMBOLS ON 



PRODUCES FOURTH SET OF 



10 



QUESTIONS 



CWHRT IS THE NAME FOR ? TRBLE NOT DISPLRYED) 

: ' PRINTS NUMBER OF QUESTIONS CORRECTLY 



DO YOU WRNT fi REPERT 



*?V 



480 GOSUB 1810 : 

RNSWERED 
490 GOSUB 3580 : 

590 ' *************** 

610 ' THIS ROUTINE GIUES THE HERDING CHEMICRL 

B O L S ON R FRAMED SCREEN 

630 U = 15360 

640 CLS 

650 PRINT CHRSC23) 

660 PR1NT*330,'C H E M 1 C A L * : PRINT S 588, 

•SYMBOLS" 



S Y M 
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670 FOP J2 = 64 TO 896 STEP 64 

68B POKE O + J2, 191 

690 POKE U + J2 +62, 191 

700 NEXT J 2 

710 FOR J2 = TO 63 

720 POKE U +J2.188 

730 POKE V + J2 +960,143 

740 NEXT J 2 

750 FOR J2 = 1 TO 1100 

760 NEXT J2 

770 RETURN 

780 ' *************** 

800 ' THIS ROUTINE SETS UP THE LIST OF FOURTEEN CHEMICAL SYMBOLS 

AND NAMES 
820 DIM SS( 14,2) 
B30 FOR J = TO 13 
840 FOR K = TO 1 
850 READ SS(J,K) 
860 NEXT K 
870 NEXT J 
880 DATA PL, ALUMINIUM, - 

C , CARBON , - 

CA, CALCIUM, ~ 

CL, CHLORINE, '" 

FE, IRON,'- 

F, FLUORINE, ~ 

K. POTASSIUM,"" 

H, HYDROGEN, - 

MG, MAGNESIUM 
890 DATA HE, HELIUM, ~ 

NA , SODIUM , ~ 

O, OXYGEN, - 

ZN. ZINC,- 

S . SULFUR 
900 RETURN 

910 ' **************** 
950 CLS 

960 PRINT© 128, "PLEASE TYPE YOUR NAME' 
970 LINEINPUT ZS 
980 LPRINT*- 

"; Z* 

990 PRINT "PLEASE TYPE TODAY'S DATE 
1000 LINEINPUT ZS 
1010 LPRINT- 

ZS 
1020 PRINT "PLEASE TYPE THE TIME 
1030 LINEINPUT Z* 
1040 LPRINT- 

Z* 
1050 RETURN 

1060 ' *************** 

1080 ' THIS ROUTINE SETS UP THE NODDY PICTURE 

1100 DATA 3, 168,- 

5,148,- 

66,160,- 

67, 158, ~ 

68, 188, ~ 

69 , 173 , ~ 

130, 178,~ 

131, 187, ~ 
132, 188, ~ 

133. 183 









• 
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1110 DATA 193. 174,- 

194.145,- 

195. 191,- 

195.189,- 

197,191,- 

198, 162, ~ 

199,157 
112B DATA 258,131,- 

259,171,- 

261, 151,- 

262, 131,~ 

322,176,- 

323, 186," 

325. 181,- 

326,175,- 

70,144,- 

134. 177 
1130 CLS 

1140 DIM A1(27),B1(27) 
1150 FOR J = 1 TO 27 
11B0 READ A1(J), BKJ) 
1170 NEXT J 
1180 RETURN 
1190 ' *************** 

1210 ' THIS ROUTINE PLACES fi LARGE CORRECT 

IN NAMED MEMORY 
1230 XS(1) =" 



1240 X*(2) =" . . 
1250 XS(3) =". . 
1260 XS(4) =• . . 
1270 X*(5) =" . 



1280 FOR TY = 1 TO 5 

1230 FOR TH = 1 TO LEN ( X*(TY) ) 

1300 IF MIDS( XS (TY), TH,1) =• . ■ THEN MID*( XS (TY), TH. 1) = CHR*(191) 

1310 NEXT TH 

1320 NEXT TY 

1330 RETURN 

1340 * ****************.*.».»»* 

1360 ' THIS ROUTINE DISPLAYS THE FOURTEEN CHEMICAL SYMBOLS AND 

NAMES 
1380 CLS 
1390 PRINTei27," 
1400 FOR J =0 TO 6 

1410 PRINT SS(J*2, 0); TAB(4); SS(J*2, 1),, S*(J*2+1, 0); TAB(36); 

SS(J*2+1, 1) 
1420 NEXT J 
1430 PRINT 
1440 PRINT 
1450 RETURN 

1460 PRINT90, "TODAY YOU WILL USE THESE NAMES AND SYMBOLS'; 

1470 RETURN 

1480 ' ************** 

1520 ' THIS ROUTINE CHOSES A RANDOM NUMBER AND DISPLAYS ONE 

OF FOUR- 
TYPES OF QUESTION : 
1530 ' G1UE A NAME FOR THE SYMBOL C WITH OR WITHOUT SYMBOL TABLE 

DISPLAYED) 

1540 " GIVE A SYMBOL FOR THE NAME (WITH OR WITHOUT SYMBOL TAELE 
DISPLAYED) 
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1580 FOP RT = TO 13 






1590 QNS(RT) = ■ * 

1E00 NEXT RT 

1610 FOR L = 1 TO 10 

1620 IF K = 1 GOSUE 1380 

1630 IF K = 3 GOSUB 1380 

1640 Q = RND(14) -1 

1650 IF QNSCG) = '*■ THEN 1640 

1660 QNS(Q) = ■** 

1670 ON K GOSUB 2020 , 2020 , 2180 , 2180 

1680 INPUT 2* 

1690 G05UB 2110 

1700 NEXT L 

1710 RETURN 

1720 ' ************** 

1740 ' THIS ROUTINE GIVES Fi DISPLRY HERDING FOR THE SECOND TYPE 

OF - 

QUESTION 
1760 CLS 

1770 PRINT CHRS( 23); 
1780 PRINT @522, "PfiRT TWO " 
1790 FOR WW = 1 TO 800 : NEXT 

1800 RETURN 

1801 ' ************** 
1810 LPRINT"- 

YOU HRUE CORRECTLY fiNSWERED ■ ; C ; QUESTIONS FROM fi 

SET OF 40 . ~ 



1815 PRINT -~ 

YOU HRVE CORRECTLY ANSWERED "; C ; ■ QUESTIONS FROM THIS 
SET OF 40. 

1816 FOR H3 = 1 TO 500 : NEXT 
1820 RETURN 

1830 ' ************* 

1850 ' THIS ROUTINE FLftSHES fi STAR IN THE BOTTOM RIGHT HfiND 

CORNER- 
WHILE THE CPU IS WRITING FOR fi KEY TO BE DEPRESSED. 
IT IS USED~ 

RS fi DELfiY WHILE THE DISPLRY IS BEING READ.~ 

1890 POKE 16382,42 

1980 2S = INKEYS 

1910 FOR JJ = 1 TO 100 

1920 NEXT J J 

1930 POKE 16382,32 

1940 FOR JJ = 1 TO 100 

1950 NEXT J J 

1960 IF 2* = •■ THEN 1890 

1970 RETURN 

1980 ' ************* 

2020 PRINT G780, "PLEASE TYPE THE SYMBOL FOR m ; SSCQ.l) 

2030 RS = SS(Q,0) 

2040 RETURN 

2041 ' ************** 

2060 ' THIS ROUTINE CHECKS IF RN RNSWER IS CORRECT 

2080 C = C + 1 

2090 GOSUB 2250 

2100 RETURN 

2110 IF 2S = RS THEN 2080 

2120 IF 2* = "SULPHUR* fiND RS = 'SULFUR* THEN 2080 ~ 

ELSE GOSUB 2440 
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2130 RETURN 

2140 ' ************* 

2180 PRINT S704. "PLEASE TYPE THE CHEMICAL "NAME FOR "; SS(Q,0) 

2190 R* = SS(Q,1) 

2200 RETURN 

2210 ' *************** 

2230 ' THIS ROUTINE CHOSES THE NEXT REWARD DISPLAY 

2250 H = H + 1 

2260 IF H > 6 THEN H = 1 

2270 ON H GOTO 2320 , 2670 , 2790 , 3030 , 3330 , 3170 

2280 ' ************* 

2300 ' THIS ROUTINE DISPLAYS 11 CORRECTS DIAGONALLY 

ACROSS THE ~ 

SCREEN 
2320 CLS 

2330 PRINT CHRSC23); 
2340 FOR J = 1 TO 11 
2350 PRINT TAB(J*2)" CORRECT" 
2360 NEXT J 
2370 GOSUB 3556 
2380 CLS 
2390 RETURN 
2400 ' ************* 

2420 ' THIS ROUTINE CHOSES THE RELEARNING RESPONSE WHEN A 

STUDENT ERROR- 
OCCURS 
2440 ON K GOTO 2480, 2480, 2570, 2570 
2460 * *************** 

2470 ' THIS ROUTINE PRINTS AND DISPLAYS THE CORRECT SYMBOL 

2500 LPR1NT"~ 

THE SYMBOL FOR " ; S*(Q,1) ; IS ; S*(Q,0) 
2505 PRINT"- 

THE SYMBOL FOR "; SStQ,l) ; " IS "; S*(Q,0) 
2510 GOSUB 1890 
2520 CLS 
2530 RETURN 
2540 ' ************* 

2560 ' THIS ROUTINE PRINTS AND DISPLAYS THE CORRECT NAME 

2580 LPRINT"~ 

THE CHEMICAL NAME FOR "; S*(Q,0) ; - IS "; S*(Q,1) 
2590 PRINT"- 

THE CHEMICAL NAME FOR "; S*CQ,0) ; IS "; S»(Q,1) 
2600 GOSUB 1890 
2610 CLS 
2620 RETURN 
2630 ' ************* 

2650 ' THIS ROUTINE FILLS THE SCREEN WITH LARGE YES MANY 

TIMES 
2670 CLS 

2688 PRINT CHR*(23); 
2690 FOR K2 = 1 TO 85 
2700 PRINT "YES 
2710 NEXT K2 
2720 GOSUB 3556 
2730 CLS 
2740 RETURN 
2750 ************* 

2770 * THIS ROUTINE DISPLAYS RIGHT IN A 

RECTANGULAR BOX 
2790 CLS 
2800 O = 15360 
2810 PRINT CHRSt 23); 
2820 FOR HY = 404 TO 420 
2830 POKE U + HY, 128 + 15 
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2B48 POKE U + HY +128. 128 + 60 

2850 NEXT HY 

2860 FOR HY = 404 TO 404 +128 STEP 64 

2870 POKE HY + U, 191 

2880 POKE HY + + 16. 191 

2890 NEXT HY 

2900 FOR HY = 1 TO 5 

2910 ZS = "RIGHT" 

2920 N = ASC ( MIDS ( ZS.HY.l) ) 

2930 POKE U + 470 + HY * 2, N 

2940 NEXT HY 

2950 GOSUB 3556 

2960 CLS 

2970 RETURN 

2990 ' ************* 

3010 ' THIS ROUTINE DISPLAYS STRRS RANDOMLY 

3030 CLS 

3040 U = 15360 

3850 PRINT CHRSK 23) 

3060 FOR SS = 1 TO 25 

3070 D = RNDC500) 

3080 POKE U + 2 * D, 42 

3090 FOR JH = 1 TO 25 

3100 NEXT JH 

3110 NEXT SS 

3120 PRINT <s>512, "CORRECT* 

3130 GOSUB 3556 

3145 CLS 

3150 RETURN 

3152 ' ****************** 

3153 ' THIS ROUTINE DISPLAYS A UERY LARGE C R R E 
C T 

3170 CLS 

3188 PRINT ©512, " " 

3198 PRINTXSC01"); 

3200 FOR HG = 2 TO 5 

3210 PRINT XS(HG) 

3220 NEXT HG 

3230 FOR HG = 1 TO 500 

3240 NEXT HG 

3250 CLS 

3260 RETURN 

3230 ' *************** 

3310 ' THIS ROUTINE DISPLAYS THE NODDY PICTURE 

3330 CLS: FOR SS = 1 TO 27 

3340 POKE 15888 + AK.SS), BUSS) 

3350 NEXT SS 

3360 FOR TY = 1 TO 3 

3370 POKE 16012,179 

3380 POKE 15883 , 128 

3390 P0KE158B5, 128 

3408 POKE 15947,174 

3410 POKE 15948,157 

3428 FOR S = 1 TO 100 

3430 NEXT 

3440 POKE 15883,168 

3458 POKE 15885,148 

3460 POKE 16012, 188 

3478 POKE 15347,142 

3480 POKE 15949,141 

3490 FOR S = 1 TO 100 

3500 NEXT S 

3510 NEXT 

3520 CLS 
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3530 RETURN 

3551 ' ************** 

3553 ' THIS ROUTINE TURNS ON THE CASSETTE PLAYER TO PLAY A 

COMMENT SUCH AS RIGHT, WELL DONE, CORRECT, BEAUTY, GOOD WORK, 

EXCELLENT , YES 

355E FOR K4 = 1 TO 408 

3557 OUT 255,12 

3558 NEXT 
3553 OUT 255,4 
3560 RETURN 

3562 ' »»*»***»****»»♦ 
3580 CLS 

3530 PRINT "WOULD YOU LIKE ANOTHER SET OF QUESTIONS"; 
3600 INPUTZ* 

3610 IF LEFT*( ZS,1) = "Y" GOTO 360 
3620 CLS 

3630 PRINT ©524, CHRSC 23); " GOODBYE " 
3640 PR1NT31023, * "; ■ 
3650 END 

3740 ' TO CHANGE THE SET OF NAMES AND SYMBOLS CHANGE THE DATA LINES~ 

880 AND 880 

THERE IS A ONE TO ONE CORESPONDENCE BETWEEN TWO SHORT ALPHANUMERIC 

SETS 
3780 ' LINES 1410, 1460, 2020, 2120, 2180, 2430, 2500,2580 



AND Z590 



WILL NEED APPROPRIATE CHANGES 









3740 ' TO CHANGE THE SET OF NAMES AND SYMBOLS CHANGE THE DATA LINEST 

880 AND 880 
3770 ' THIS PROGRAM MAY BE ALTERED TO SUIT ANY EDUCATIONAL AREA WHERE 

THERE IS A ONE TO ONE CORESPONDENCE BETWEEN TWO SHORT ALPHANUMERIC 
SETS 
3780 ' LINES 1410, 1460, 2020, 2120, 2180, 2480, 2500.2580 

AND 2590 t 

WILL NEED APPROPRIATE CHANGES 



(Continued from page 27) 
MON ITOR /DEBUGGER 

A monitor is a program which enables you to control the activities of the Z80 
A debugger is a program which helps you to trace errors (bugs) in your machine 
language programs. With a monitor you can usually:- examine and change memory 
either byte by byte or in blocks, punch and read SYSTEM tapes, GO to an address 
in memory and execute a program there, move blocks of data around memory, relocate 
machine language programs to operate in different parts of memory etc 
A debugger will usually allow you to break theoperation of machine language programs 
at specified points, examine and change registers, sometimes to step through a program 

nstruction by instruction. Most programs do not work first time and a monitor/ 
debugger is a useful tool to use in fixing them up. 

(continued on page 35) 
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** SOUND GENERATION WITH THE TRS-80 ** a general introduction by Peter Hartley. 

There are three main approaches to sound generation with a TRS-80. 

(a) Modifying the radio frequency interference that the '80 generates so 
that the "music" can be picked up on an ordinary A.M. Radio. 

(b) Taking charge of the cassette port, and delivering the appropriate 
square-waves to the cassette jack. 

(c) Interfacing the '80 to an external sound generator through one or more 
I/O ports. 

Articles on the first and third approaches are in course of preparation. 
The second approach is the basis of two programs in this issue... and readers 
are urged to study the appropriate sections of "TRS-80 ASSEMBLY LANGUAGE 
PROGRAMMING" by William Barden, Jr., available from your local Tandy Store 
for the bargain price of $3.95- 

Ron Sully has prepared copious notes on his effort , and these are reproduced 
in full. Note that line of Ron's listing is a dummy line of 255 bytes.... 
used for the M/L routine. 

A.F. West has adopted a very similar approach, but uses the two part method, 
a M/L dump, which is accessed by a BASIC master program, which allows the 
user to test various frequency/duration mixes , and responds with the access 
code required to generate the same sound from the BASIC program that you 
still haven't written. This M/L routine can then be used with your own BASIC 
program and you've got instant sound! 

Use a good monitor to load the M/L routine (BMON perhaps) and save a copy to 
tape. Then write and save the BASIC program. Details of memory protect 
level, etc. are given in appropriate REMs. 

*(HINT - To return to BASIC from a SYSTEM load, without accessing the M/L 
routine, just hit < ENTER > ). 



(continued from page 3*0 
DISASSEMBLER 

A disassembler is a program which performs the opposite function to an assembler. 
It convert a machine language program back into mnemonics. This is useful for making 
minor changes to a program, discovering how it works etc.. 






§ 
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SOUND EFFECTS (L2/16K/UK) - by Ron Sully. 

■ 
This BASIC program demonstrates the possibilities of the use of sound effects 
in BASIC programs by having a M/L routine reside in a REM statement. 

The M/L routine is essentially in two parts: 

1. The routine which plays the notes, and 

2. The data or table of values which determine the duration and frequency 

of the note. 

(For further reading see RADIO SHACK publication "TRS-80 Assembly Language 
Programming" pp. 179-183). 

In this program the REM statement is at line and part 1 of the M/L routine 
occupies MEM locations 17139 ( 1 t2F3H) to 17187 C+323H). Part 2 occupies the 
remainder of the line, 17188 (U32*tH) to 17371 (&3DBH). 

To hear the sounds you will need either a cassette recorder/player with 
AUXILIARY INPUT facilities or an amplifier. (I use my CTR kl which has been 
modified in accordance with the procedure published in MICRO-80 Issue 1, 
pp. 16-17). 

If you use a cassette, remove any tape that may be in it, hold down the 
record/protect lever and press the record/play buttons . Some better types 
of cassette have an AUX INPUT jack which allows the cassette to be used as 
an amplifier without having to press the record/play buttons. If you have 
one of those all the better. You can really turn the volume up. (Stand 
back!!) Simply connect the grey plug on the TRS-80, yellow lead on the 
System 80, to the cassette aux input or amplifier and you are in business. 

To get the program going, CLOAD it - (if you are keying it in make sure you 
CSAVE it before RUNning it), prepare your cassette or amplifier then RUN... 

(I don't profess to be a musician - in fact I'm tone deaf! So if the sounds 
I created aren't to your liking then read on!) 

As mentioned previously the sound is created by a M/L routine which is in 
two parts. The first part is the DATA at line 10 and is POKEd into line 
by the loop at line 20 ....FOR K = 17139 TO 17187: 

READ Y:POKE K,Y:NEXT so under no circumstances 

should you either; 

1. Edit line or shorten it. 

2. Change the DATA in line 10, or 

3. Change the K loop in line 20. 

(unless you are an EDDY PAAY and know what you are doing). 
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The second part of the M/L routine determines the notes you hear. The values 
are again POKEd into memory location 17188 to 17371 by different routines. 
(If you exceed MEM location 17371 you will start POKEing into line 10 and 
will blow the program). 

To create your own sounds you will need to POKE values into two memory 
locations for each note. The first value determines the duration of the 
note, the second determines the frequency. (And of course there's no need 
to tell you that the values must be in the range 1-255!) 

After POKEing in the values for the notes, finish off by POKEing into the 
next MEM location. (it should be an even number). (The acts as a check 
for the M/L routine. It says .. { 

"No more notes to play. . .go back to BASIC"). Without it... well perhaps 
you'd like to find out! 

To illustrate; to create the first BEEP you hear I POKEd the following: 
POKE 17188, 90 : POKE 17189 , 90 : POKE 17190, (Line 30). 
DURATION FREQUENCY RETURN 

For the mathematical and musical buffs the following equations will aid in 
determining specific frequencies: 

VAL = INT(l/FREQ*10t6/llt.6U) 

where VAL = value to be POKEd and FREQ = frequency of the note. e.g. If you 
wish to play C (frequency 523.3 Hz) then, using the above equation the 
value to be POKEd is 130. 

VAL = INT( 1/523. 3*10f6/lk.6k) 
= 130 

Similarly if you pick a value and you wish to know what frequency the note 
is, use the equation: 

FREQ = INT(l/VAL*10t6/lU.6U) 

Knowing we can only POKE the values 1 to 255 the above equation tells us the 
frequencies we can play are in the range of 267 Hz to 68,306 Hz. It also 
tells us that the higher the number we can use the lower t he frequency. 
(VAL of 1 = 68,306 Hz, VAL of 255 = 267 Hz). Which means we can reproduce 
the notes from just above Middle C (261.6 Hz) to ear piercing. 

For best results keep your values somewhere between 60 and 180 for both 
frequency and duration. You will need to experiment with the value for the 
duration. As long as you remember that the higher the number the longer the 
duration for each note. 
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To use this particular sound routine in your own BASIC programs you will need 
to include the following in your program: 

1. Line with a GOTO 20 followed by a REM and the rest of the line can 
be filled with spaces. 

2. Line 10 the DATA list for part 1 of the M/L routine. 

3. Line 20 a FOR.. NEXT loop which reads the DATA and POKEs it into mem 
locations 17139 to 17187. 

k. POKE 16526, 2*+3 : POKE 16527, 66. The entry address of the M/L 
routine. 

5. Different routines to POKE your sound effects into mem locations 17188 
to 17371, and 

6. X = USR(0) to jump to the M/L routine when you wish to bring the sounds 
into effect. (For general use suggested places are, before; PRINT 
statements, CLS, ENTER and INKEY0). 

WARNING ! ! As all of us novices know, playing around with the M/L routines 
and POKEing around can get us into trouble. The following points are 
mentioned so you don't find the same pitfalls that I did: 

1. DON'T TRY TO EDIT LINE 

2. DON'T POKE OUTSIDE THOSE MEM LOCATIONS 

3. MAKE SURE YOU HAVE THE PROGRAM ON TAPE BEFORE RUNNING IT 
k. IF YOU GET AN OD ERROR MESSAGE (AFTER BREAK THEN RUN) 

USE "GOTO 170" TO KICK OFF AGAIN THEN SELECT OPTION k. 
YOU CAN THEN BREAK AND RUN WITHOUT ANY HASSLE. 
5 . IF YOU IGNORE POINT 3 ABOVE THEN RE ENTER LINE AS FOLLOWS : 

GOTO 20: REM (FILL WITH SPACES) 

THEN CSAVE BEFORE RUNNING. 

Last but not least. The DATA values in line 320 are the specific values for 
duration and frequency to play the tune. (What did you expect? TCHAIKOVSKY?) 

UKers will have to remove REM lines 1*0, 50, 60, 70, 330 and 3^0 to RUN 
the program 

Hint? Use EMON to merge your program with lines 0, 10, 20 and 30 of 
this program. 

I hope you have fun with your new found sound. 






■ 
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BOUND ' FECTS Lll/16 



GOT 020: 

REM THIS LINE IS ft DUMMY REMARK STATEMENT AND WIL 
L BE0UERWR1TTEN BY THE MACHINE LANGUAGE ROUTINE. 

UNDER NO CIRCUMSTANCES ARE YOU TO EDIT THIS 
LINE OR REMOVE THIS LINE. (FILL THE REMAINDER WITH SP 

ACES ) ^ 

10 DATA221, 33, 36, 67, 221, 78, 0,121, 183, 200, 221, 78,1,62,1,211, 25 
5,16,254,221,70,1,62,2,211,255,16,254,13,194,253,66,221, 
35,221,35,1,255,255,33,48,0,9,218,29,67,195,247,66 
20 P0KE16526,243: 

POKE 16527, 66: 
F0RK=17139T017187: 
READ Y: 
POKEK , Y : 
NEXT 
38 POKE17188,90: 

POKE17189.90: 
POKE 17 190,0: 
X=USR(0) 
40 ' COPYRIGHT MAY 1980 
50 ' RONALD J . SULLY 

60 '117 BRYANT RD, LOGANHOLME, OLD, 4129 
70 ' PHONE ( 07 ") 2098370 
80 DEFINTA-Z: 

DIMS (35): 

CLS: 

PRINTTAB( 15) "DEMONSTRATION SOUND EFFECTS*: 

PR1NTTABC ISr 

90 PRINT "THIS SIMPLE PROGRAM DEMONSTRATES ONE OF THE WAYS 
THAT SOUND EFFECTS CAN BE ADDED TO ' 80 PROGRAMS TO GI 
VE THEM THAT BIT OF EXTRA APPEAL. 
100 PRINT "THE M/L ROUTINE REQUIRED TO PUT THE SOUNDS INT 
EFFECT WILLRESIDE IN MEMORY LOCATION 17139 TO 17187 
. (REM LINE 8) THE VALUES WHICH DETERMINE THE FREQUEN 
CY AND DURATION OF NOTES CAN OCCUPY MEMORY LOCATION 1718 
8 TO 17371. 
110 PRINT "UNDER NO CIRCUMSTANCES ARE THE VALUES IN THE DATA 
STATEMENT ATLINE 10 TO BE CHANGED. TO ALTER THE N 
OTES PLAY AROUND BYPOKING DIFFERENT VALUES INTO MEM 
ORY LOCATIONS 17188 TO 17371. YOU MAY POKE ANY NUMBER 
F VALUES PROVIDING YOU " ; 
120 PRINT "DO NOT EXCEEDMEM LOCATION 17371 AND THE LAST VALUE 
YOU POKE MUST BE '0* . * : 

PRINT "PRESS ANY KEY TO CONTINUE. 
138 A$=INKEY*:IFA*="-THEN130ELSECLS:PR1NT"MAKE READY YOUR CASSE 
TTE OR AMPLIFIER FOR SOUND EFFECTS . . ." :FORX=1TO30: READS 
(X):NEXT 
140 PRINT: PRINT "PRESS ANY KEY TO CONTINUE. (WITH SOUND 1 .) 
150 A*=INKEYS: 

1FA«=" "THEN150ELSECLS: 
X=USR(0) 
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160 PRINT "YOU SHOULD HAVE HEARD ft EEEP THEM. IF MOT, CHECK TH 
E CONNECTIONSTO YOUR CASSETTE OR AMPLIFIER. * : 

PRINT "IF SATISFIED THAT EVERYTHING IS AOK. PRESS 
ANY KEY TO GET RRECURRING EEEP. USE THIS LEEP RS R OO 
LUME CHECK. 
178 PRINT "WHEN HRPPY WITH THE VOLUME PRESS RNY KEY RGRIN T 

CONTINUE TOFURTHER SAMPLES. 
180 R$=1NKEYS: 

IFAS="" THEN 180 
198 fl$=INKEY$: 

IF RS= * " THENX=USR( > : 
GOT 01 98 
200 CLS: 

X=USR(0): 
PRINT : 

PRINT "THIS DEMONSTRRTION PROGRRM OFFERS THE FOLLOWI 
NG URRIATIONS.": 
X=USR(0): 

PRINT "(RLL CREATED BY POKEING DIFFERENT URLUES INT 
O MEMORY LOCATIONS 171 88 TO 17371}.": 
PRINT 
218 X=USR(0): 

PRINT " 1 . R SINGLE BEEP" : 

X=USR(0>: 

PRINT " 2 . R ^ilREN t ? ) " : 

X=USR( ) : 

PRINT "3. R WRRNING SIGNAL": 

X=USR( 8 ) : 

print "4. lrser (?) shots*: 

x=usrcb:>: 

print "5. r series of random notes": 

X=USRC0): 
* PRINT'S. fi TUNE 

220 X=USR(0): PRINT: PRINT "SELECT 1, 2, 3, 4, 5 OR B . . . . 
238 RS=INKEYS: 

IFA5»" *THEH230ELSER=ORLt RS ") : 

IFR< 1ORR>BTHEN220 
240 F0RT=1TCR: 

X=USR(8): 

FOR?.- IT 030: 

NEXTZ , T : 

ONRGOT 0280 , 278 , 288 , 298 , 3S0 ,318 
2S0 P0KE17iE8,123-. 

POKE 17 189, 120: 

POKE1?1S0,0: 

PRINT : 

INPUT "PRESS ENTER TO RETURN TO OPTIONS" ;AS: 

GOT 0200 
260 CLS: 

PRINT : 

PRINT : 

PRINT : 

PRINT "THIS IS A SINGLE BEEP ": 

POKE17188,100: 

POKE17183.10B: 

FORT=1TO600: 

NEXT: 

X=USR( ) : 

GOT 0250 
























270 CLS: 



288 CLS: 



230 CLS: 



300 CLS: 



PRINT: pAGE j^ 1 

PRINT : 

PRlNT m A SIREN (7) . . . ."• 

F0RK=17188T017251STEP2: 

POKEK.10: 

POKEK+l.K-17130: 

NEXT : 

POKE 17252,0: 

F0RT=1T038: 

X=USR10"): 

NEXT : 

GOTO2S0 

PRINT : 

PRINT : 

PRINT -R WARNING SIGNAL . . - .": 

2=70: 

F ORK= 17 188T 047357STEP2 : 

POKEK.200: 

POKEK+1,2: 

2=-2+120: 

NEXT: 

POKE 17358, 0: 

X=USRC ~) : 

GOTO250 

PRINT : 

PRINT : 

PRINT 'LASER l?> SHOTS. . . . *: 

F ORK= 17 188T0 17247STEP2 : 

POKEK,10: 

P0KEK+1,K-17186: 

NEXT : 

POKE 17248,0: 

FORT = 1TO20: 

X=USR(0J: 

NEXT: 

GOTO250 

PRINT : 
PRINT : 
PRINT "ft SERIES OF RANDOM NOTES ....*: 

F0RT=17188T0173B5: 

POKET , INT ( 60*RND( 1+80 1 : 

NEXT: 

POKE173BB,0: 

X=USR(0): 

GOT 0250 



310 CLS: 



PRINT : 

PRINT : 

PRINT* A TUNE . . . . * : 

F0RX=17188T017218: 

POKEX,S(X- 171871: 

NEXT: 

X=USRt01: 

GOTO250 
320 DATA160, 144,63, 182,82, 172,88, 144, 180, 144, 64, 144, 112, 128,2 

40,144,83,162,91,173,86,144,224,107,72,35,255,84,0,0 
330 ' THE MACHINE LANGUAGE ROUTINE AND TUNE ARE FROM THE TAN 
DY RADIO SHACK PUBLICATION ' TRS-80 ASSEMBLY LANGUAGE PR 
0GRAMM1NG' PP 182-183. THE M/L ROUTINE WAS RELOCATED AN 
D MODIFIED TO RUN WITH BASIC. 
340 ' MANY THANKS TO EDDY PAAY AND MICRO-80. THIS PROGRAM WA 
S THAT MUCH EASIER TO COMPILE USING BMON. RON SULLY 



ISSUE 8 (JULY 1980) 



MICRO-80 PA° E h2 



4 ■ SOUND LEUEL 11 / 16k - REQUIRES M.L. DUMP - HOT SUITED TO DISK BRS1C 

5 ' MEM 3273? - C1M = 7FE2-7FFF~ 

A.F. WEST, 13 ROSE STREET, ERUNSWICK, 350B 
B ' MICRO -80 ISSUE 8 JULY 1380 
10 POKE 18526,228: P0KE1B527 , 127 
20 CLS: PRINT 

** S O U N D ** 

30 PRINT: PRINT 

"THIS IS A PROGRAMME TO TEST FOR THE SOUHDS DESIRED BEFORE 
ENTERING THE DATA INTO THE PROGRAMME BEING COMPILED. 

40 PRINT* IT USES A RELOCATABLE M/L SUBROUTINE. (DETAILS ARE GIUEN LATER) 

THE TONE OF THE SOUND AND ITS DURATION DEPENDS UPON THE NUMBER SET 
(IN BASIC) IN THE USR( ) CALL. 
50 PRINT 'THIS NUMBER IS MADE UP FROM TWO UALUES : -~ 

FU - WHICH DETERMINES THE FREQUENCY OF THE TONE~ 
DU - WHICH DETERMINES ITS DURATION 
60 PRINT "A TABLE OF THE APPROX. FREQUENCIES AND DURATIONS OF THE IOUND 

TONES CORRESPONDING TO UALUES OF FU AND DU FOLLOW. 
B5 GOSUB 135: GOSUB 70: GOSUB 135: G0T0148 
70 CLS: PRINT 

"FREQUENCY UALUES : - (FU NO. = FREQ. IN HERTZ) 

80 PRINT "1 = 14300"," 8 = 2299" ," 19 = 1000" , * 60 = 317 

S0 PR1NT"2 = 8200*," S = 2062", "20 = 943"," 80 = 240 

95 PRINT-3 = 5750", "10 = 1€S69*,*25 = 758*,* 100 = 192 

100 PR1NT*4 = 4445*, "11 = 1695" , "30 = 633* ," 125 = 153 

105 PRINT "5 = 3571", "13 = 1450" „ "35 = 544' ,* 150 = 14B 

110 PR1NT-6 = 3030", "15 = 1250", *40 = 476", "200 = 86 

115 PR1NT-7 = 2632", "17 = 1111*, '50 = 381" ,* 255 = 75 

120 PRINT: PRINT 

-DURATION UALUES : - (DU NO. = TIME IN SECS. ) 
125 PRINT" 1 = .007",,* 50 = .345 
": PRINT 

* 5 = .035* , , "100 = .698 
130 PRINT -10 = .889",, * 127 = .876 
": PRINT 

"25 = .173" , ," = 1.753 
" : RETURN 
135 PRINTS990, * * ; : INPUT 

"(PRESS < ENTER > TO CONTINUE) *;2$: RETURN 
140 CLS: PRINT 

*TO TEST IF THE : SOUND: MEETS YOUR REQUIREMENTS, TRY DIFFERENT 

UALUES FOR FU & DU USING THE <T> COMMAND. ~ 

(THE TONE WILL BE REPEATED 5 TIMES FOLLOWED BY THE USR( ) NUMBERTO BE 

ENTERED INTO YOUR OWN PROGRAMME) 
145 PRINT: PRINT 

"CONNECT THE OUTPUT FROM THE CPU (NORMALLY PLUGGED INTO THE 

RECORDER AUDIO SOCKET) TO A SUITABLE MINI AMPLIFIER/SPEAKER. 
158 PRINT: PRINT 

THE COMMAND LIST FOR THIS PROGRAMME IS : -~ 

T - TO TEST THE SOUND~ 

L - FOR APPROX. FREQUENCY & DURATION UALUES"" 

P - FOR M/C LANGUAGE PROGRAMME FOR : SOUND: 
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155 PRINT " E - TO EXIT THIS PROGRRMME 

H - FOR COMMRND LIST 

CS=1NKEYS: 1FCS=" "THEN160 

IFCS="H" THENCLS: GOTO150 

IF C*=*E* THENCLS: GOTO1000 

IFC*="L"GOSUB 70: GOTO1B0 

IF C*= * T " THEN300ELSEIF C*= * P* THEN200ELSE 160 
CLS : PR I NT 

* * MACHINE. LRNGURGE LISTING FOR RELOCRTRELE 
PRINT: PRINT 

"+0007 ED*."+000E 03" 



160 
165 
170 
175 
180 

200 

205 

210 
215 
220 
225 
230 
235 
240 
250 



255 

260 

300 

305 

310 

320 



330 
340 



*E **#* CD" 
PRINT" +0001 



PRINT ' 
PRINT ' 
PRINT' 



+0002 
+0003 
+0004 



PRINT* +0005 
PRINT * +0006 



7F" 
0R" 
3E" 
0J." 
0E" 
00" 



"+0008 

* +0008 
" +000R 

* +000B 
" +000C 
" +000B 



5B" 
3D* 
40" 
45" 
2F* 
E6* 



RTRELE : SOUND: 


PROGRRMME 


+0015 10 






B3" , "+0016 


F6 




D3° , *+0017 


18 




FF" ,"+0018 


F2 




OD* ."+0018 


25 




28" ,"+00 1ft 


20 




04" ,"+00 IB 


Fl 





" +000F 

"+8010 

"+0011 

"+0012 

"+0013 
. "+0014 
PRINT, , ,"+00 1C C8" 

PRINT "NOTE: IN THIS PROGRRMME THE BftSE B FOR THIS M/C SUBROUTINE 
IS 7FE2. IF YOU CHftNGE THE BRSE THEN CHRNGE THE URLUES (DEC) POKED 
INTO RDDRESSES 16526 (LSD) RND 16527 (MSB) RCCORDINGLY. * 
PRINT*(E.G. IN THE : BRSIC LISTING: OF THIS PROGRRMME< 0tHE NUMBERS 

226 & 127 IN LINE NO. 10 WOULD BE CORRESPONDINGLY ALTERED) 
GOTO 160 
CLS: INPUT 

"TRIRL FREQUENCY (FU) NO. (.BETWEEN 1 & 255) ";FU 
IF FVK1 0RFU>255 THENPRINT'THRT NUMBER IS NOT UflLIF* 
NEXT: GOT 0300 

INPUT* TRIRL DURRTION (DU) NO. (BETWEEN & 127) 
S=256*DU+FO: 1FS>32767 THENPRINT 

"THRT NUMBER IS NOT VALID. TRY RGR1N* : FORT=1TO1000: NEXT: 
GOTO300 

F0RX=1T05: SS=USR(S): FORT=1TO280: NEXTT,X 
PRINT: PRINT: PRINT 

"IF THRT FLAMING NOISE RPPERLS TO YOU, ENTER INTO YOUR MRIN 
PROGRftMME WHERE YOU WRNT THIS SOUND ~ 



FORX=1TO1000: 



;DU 






; S ; " ■) 



350 

1000 



SS = USR( 
GOT Ol 60 

SS=USR(6500): SS=USR(200): PRINT 

* SORRY RBOUT THRT 1 \ MY* YOUNG BROTHER RDDED THRT COMMENT . 
FORX=1TO1500: NEXT: CLS 



7FE0 00 00 CD 7F 0R 3E 01 0E 00 ED 5B 3D 40 45 2F E6 
7FF0 03 B3 D3 FF 0D 28 04 10 F6 18 F2 25 20 Fl C3 00 















iU 



*~x» 



■ 
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Still no sign of the Chess War article. If we haven't got it for next issue 



we will have to start all over again. 
DEC BIN DEC (Ll) 

A level I program which teaches the 
relationship between Decimal, Hexa- 
decimal and binary arithmetic 

ADD HEX ADD (L2) 

A Level II program similar to the above. 



Next month's software will include: 
JETBOAT (Ll) 

Try to steer your jetboat 
across the river against the 
vagaries of the current without 
being swept over the falls to 
join the Editor, who has never 
made it yet! 



« 






B GAME (L2) 

In this business game you run your own 
business buying, processing and selling 
your product in competition with other 
companies doing the same. You can 
borrow money , pay dividends , etc . A 
full set of books presented at the end 
of each month shows you how well you 
have done. 



ANDROID SHOOTMAN (L2) 
This is a 21st Century version 
of Hangman. Graphics are 
Androids being executed by 
laser beams rather than gallows. 
Quite grisly, really. 

POET (L2) 

This program generates poetry 
from an inbuilt data-base which 
is easily changed by people 
who do not like Edgar Alan Poe. 



Plus all the usual articles, letters, news etc. 
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***** CASSETTE EDITION INDEX ***** 

Level I programs are on Side 1 (not suitable for System 80 computers); Level II 
programs are on Side 2. Each program is recorded twice in succession. 

APPROX. START POSITION 

I.D . 
LI/ UK 



SIDE 1 






CTR-Ul CTR-80 SYS 80 



CATCH 



FUEL ECONOMY 




L1AK 


SIDE 2 






SYMBOL/BAS 




L2/16K 


INTEREST 




L2/1+K 



SOUND EFFECTS 
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16 
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75 


1 ' 


210 
233 


130 
1U5 


90 
100 


258 
290 


160 
180 


110 

125 ! 



Single copies of the Issue 8 cassette may be purchased by SUBSCRIBERS for $3-50. 
The combined magazine and cassette subscription rate is $60.00 for 12 issues. 
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A SPECIAL OFFER! 



TO 
SUBSCRIBERS OF 





FOR THE FIRST TIME IN AUSTRALIA! 
GENUINE TANDY TRS-80 MICRO-COMPUTERS, 
HARDWARE AND SOFTWARE AT 

GREAT DISCOUNT PRICES!!! 



HOW TO ORDER - 

1. SELECT ITEMS FROM 1980 TANDY CATALOGUE 

2. DEDUCT 10% FROM ADVERTISED PRICES 

3. POST US YOUR ORDER STATING DESCRIPTION 
CAT. No AND A CHEQUE OR MONEY ORDER. 

WE WILL - 

1. ATTEND TO YOUR ORDER WITHIN 7 DAYS * 

2. SUPPLY GOODS SELECTED FREIGHT FREE ! 
SEND ADVERTISING REGULARLY TO KEEP 
YOU INFORMED OF CURRENT SPECIALS ! 

subject to availability 



3. 



TANDY 

■ ELECTRONICS 



DEALER 



9>4l 



to CONQUEST ELECTRONICS Pty. Ltd. 
212 Katoomba St. KATOOMBA 2780 



Please supply — 

OTY. CAT NO DESC. 



ADV. PRICE 



SUB TOTAL 
LESS 10* 
FIND CHEQUE FOR TOTAL 



SEND FREIGHT FREE TO 

NAME 

ADDRESS 



..P/Code. 



eomum mcwonm 



PTY. LTD. 



212 KATOOMBA ST KATOOMBA N.S.W. 2780 PHONE (047) 82 2491 
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LEVEL II RO 
REFERENCE MANUAL 

by Edwin Paay 
Published by MICRO-80 PRODUCTS 

Written by Eddy Paay, the LEVEL II ROM REFERENCE MANUAL is the most 
complete explanation of the Level II BASIC interpreter ever published. 

Part 1 lists all the useful and usable ROM routines, describes their functions 
explains how to use them in your own machine language programs and notes the 
effect of each on the various Z 80 registers. 

Part 1 also details the contents of system RAM and shows you how to intercept 
BASIC routines as they pass through system RAM. With this knowledge, you can 
add your own commands to BASIC, for instance, or position BASIC programs in 
high memory — the only restriction is your own imagination! 

Part 2 gives detailed explanations of the processes used for arithmetical 
calculations, logical operations, data movements, etc. It also describes the various 
formats used for BASIC, SYSTEM and EDITOR/ASSEMBLER tapes. Each section 
is illustrated by sample programs which show you how you can use the ROM 
routines to speed up your machine language programs and reduce the amount of 
code you need to write. 

The LEVEL II ROM REFERENCE MANUAL is intended to be used by machine 
language programmers. It assumes a basic understanding of the Z 80 instruction 
set and some experience of Assembly Language programming. But BASIC 
programmers too will benefit from reading it. They will gain a much better insight 
into the functioning of the interpreter which should help them to write faster, more 
concise BASIC programs. 
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